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AMSTRAD  CPC6128 

Ordinateur  a  unite  de  disque  integree 


Une  progression  logique 

Encourages  par  l'immense  succes  des  systemes  AMSTRAD  CPC464  et  CPC664  et  mus 
par  Sa  meme  impulsion  novatrice.  nous  sommes  fiers  de  vous  presenter  le  CPC6128. 

Fidele  a  notre  concept  de  compatibilite,  le  CPC6I28  fonctionne  avec  les  logiciels  de  ses 
deux  predecesseurs  et  dispose  en  outre  d'une  RAM  supplemental  de  64Ko  pour 
exploitation  du  systeme  CP/M  et  autres  applications  utilisateur. 

CP/M  PLus 

Le  systeme  CP/M  Pius,  appele  egalement  CP/M  3.1,  offre  une  grande  facilite  d'acces  a  la 
bibliotheque  des  logiciels  CP/M80.  Les  61Ko  dc  TPA  (Transient  Program  Array  ou 
« tableau  de  programme  transitoire  »)  fournissent  a  tous  les  programmes  CP/M80  une 
vaste  capacite  d 'exploitation  et  tout  1'espace  requis  pour  le  stockage  des  donnees.  Bien 
que  compatibles  entre  elles,  les  versions  CP/M  Plus  et  CP/M  2.2  sont  toutes  deux  disponi- 
bles  pour  vous  permettre  d'exploiter  sans  modification  les  applications  developpees  avec 
le  systeme  CP/M  2.2. 

La  plupart  des  logiciels  CP/M  2.2  peuvent  beneficier  des  nombreuses  ameliorations  du 
CP/MPlus,  sans  risque  de  confiit.  La  fonction  d'emulation  des  tcrminaux  integree  au 
CP/M  Plus  pcrmet  d'installer  directement  des  logiciels  configures  pour  Pexploitation 

d'ecrans  aux  caracteristiques  analogues  a  celles  des  terminaux.  VT52  et  Zenith  Z19/Z29. 

GSX 

Grace  au  systeme  d'extension  graphique  GSX  fourni  avec  le  CP/M  Plus,  les  programmes 
duplication  peuvent  adresser  imprimantes.  tables  tracantes  et  ecrans  utilisant  des 
instructions  standard:  la  notion  de  portability  des  programmes  CP/M  est  ainsi  elargie  au- 
dela  des  seuls  ecrans  de  texte.  II  est  possible,  en  outre,  d'interfacer  les  logiciels  beneficiant 
du  GSX  avec  un  grand  nombre  d'imprimantes,  pour  obtenir  des  copies  sur  papier  de 
graphiques.  diagrammes,  etc. 

Dr.  LOGO 

Tandis  que  LOGO  de  Digital  Research  poursuit  ses  investigations  dans  le  monde  de  1'en- 
seignement  assiste  par  ordinateur,  la  capacite  accrue  du  6128  permet  d'etendre  le  logiciel 
Dr.  LOGO,  utilise  precedemmenl  sous  CP/M  2.2.  Et.  bien  entendu.  les  programmes  ecrits 
sous  CP/M  2.2  jouissent  d'une  compatibilite  ascendante. 
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IMPORTANT 


Remarques  relatives  a  installation 

1.  Suivez  les  instructions  dans  la  partie  1  du  Cours  Elementaire  et  utilisez  unc  prise  a  3 

broches  pour  le  raccordement  au  secteur. 

2.  Ne  tentcz  jamais  de  brancher  le  systeme  sur  une  autre  tension  que  220  V  CA,  50  Hz. 

3  Aucune  piece  du  systeme  n'etant  depannable  par  1'utilisateur,  il  est  superflu  et  peu 
recommande  de  chercher  a  y  acceder.  Pour  le  depannage,  faites  toujours  appel  a  un 
technicien  qualifie. 

4  Pour  plus  de  confort  visuel,  eloignez  le  moniieur  le  plus  possible  du  clavier  et  reglez  la 
luminosite  de  I'ecran  en  fonction  de  1'eclairage  de  la  piece.  La  commande  de  bnllance 
du  moniteur  doit  etre  reglee  sur  le  niveau  le  plus  faible  possible. 

5.  L'ordinateur  doit  se  trouver  en  face  du  moniteur  et  le  plus  loin  possible  de  ce  dernier. 
Pour  une  fiabilite  maximale,  placez  l'unite  dc  disque  a  droite  de  I'ecran.  Evitez  d'mstal- 
ler  l'ordinateur  a  proximite  d'une  source  d'interferences. 

6.  Veillez  a  eloigner  les  disques  et  les  unites  de  disque  des  champs  magnetiques. 

7.  Si  vous  disposez  d'une  deuxieme  unite  de  disque,  separez  le  cable  plat  d'interconnexion 

de  l'unite  du  cable  d'alimentation  secteur. 

8.  Veillez  a  degager  les  orifices  de  ventilation  du  systeme. 

9.  Evitez  d'entreposer  votre  materiel  dans  des  endroits  trop  chauds,  froids,  humides  ou 

generateurs  de  poussiere, 

Remarques  relatives  au  fonctionnement 

(Ne  vous  inquietez  pas  si  les  termes  techniques  employes  dans  ce  chapitre  vous  paraissent 
obscurs :  ils  s'eclairciront  au  fur  et  a  mesure  que  vous  avancerez  dans  le  manuel). 

1  N'oubliez  jamais  de  retirer  la  disquette  de  son  unite  avant  de  mettre  le  systeme  sous 
ou  hors  tension.  Vous  risqueriez  de  l'endommager  et  de  perdre  les  programmes  et  don- 
nees  quelle  contient. 

-1    Faites  toujours  une  sauvegarde  des  disquettes  contenant  des  programmes  precieux. 
"'  C'est  le  cas  notamment  de  la  disquette  du  systeme  d'exploitation  CP/M  fournie  avec 

le  6128.  En  cas  dc  perte  ou  d'alteration  accidentelle  des  dormees  d'une  disquette,  son 

rem  placement  pour  rait  s'averer  des  plus  couteux. 

3.  Pour  eviter  Tecrasement  accidentel  des  donnees  stockees  sur  la  disquette  du  CP/M, 
veillez  a  ne  pas  recouvrir  scs  ouvertures  de  protection  a  recriture. 


CPC6128 
Avertissement 


4.  Si  vous  utilisez  deux  unites  de  disquettes,  l'unite  AMSTRAD  FDI,  par  exemple,  met- 
tez  toujours  la  deuxieme  sous  tension  avant  d'allumer  l'ordinateur. 

5.  Ne  touchez  pas  la  surface  magnetique  de  la  disquette. 

6.  Ne  retirez  jamais  la  disquette  en  cours  de  lecture  ou  d'ecriture. 

7.  Rappelez-vous  que  le  formatage  d'une  disquette  entralne  reffacement  des  donnees 

qu'elle  contient. 

8.  Les  progiciels  sur  cassettes  destines  au  systeme  AMSTRAD  CPC464  font  parfois 
appel  a  l'espace  memoire  occupe  par  I'interface  interne  d'exploitation  sur  disques  et 
sont  done  inutilisables  sur  le  6 1 28  equipe  d'un  lecteur  de  cassettes.  Pour  les  problemes 
de  comptabilite  concernant  les  logiciels  sur  cassette,  adressez-vous  directement  a 
AMSOFT.  De  toute  facon,  la  plupart  des  logiciels  AMSOFT  sont  disponibles  sur  dis- 
quettes. compatibles  avec  le  systeme  6128. 

9.  Le  depot  legal  de  votre  disquette  CP/M  (encodee  d'une  reference)  ne  permet  son  utili- 
sation que  sur  un  seul  systeme  informatique.  Vous  n'etes  done  pas  autorise  a  donner 
cette  disquette  a  un  autre  utilisateur.  A  ce  sujet,  lisez  attentivement  le  texte  de  depot 
legal  situe  a  la  fin  du  manucl  (Annexe  1). 
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Cours  elementaire 


Partie  1 :  Mise  en  marche 

L'ordinateur  personnel  AMSTRAD  6128  peut  fonctionner  avec  les  ecrans 

suivants : 

1.  AMSTRAD  GT65,  moniteur  monochrome  vert 

2.  AMSTRAD  CTM644,  moniteur  couleur 

3.  AMSTRAD  MP2,  boitier  d'adaptation  et  televiseur  couleur  muni  de 
prise  peritel. 


Cours  Elementaire  Chapitre  1    Page  1 


Connexion  de  1'ordinateur  a  un  moniteur 

(Si  vous  utilisez  le  6128  avec  un  boitier  d'adaptation,  pasiez  directement  au  chapitre  sui- 
vant). 

1.  Assurez-vous  que  le  moniteur  n'est  pas  branche  sur  secteur. 

2.  Connectez  le  cable  sortant  de  I'avant  du  mbniteur,  equipe  d'une  fiche  DIN  a  6  broches, 
a  la  prise  MONITOR  situee  a  1'arriere  de  votre  ordinateur. 

3.  Connectez  le  cable  sortant  de  I'avant  du  moniteur,  equipe  d'une  fiche  5  V  DC,  a  la 
prise  5  V  DC,  situee  a  1'arriere  de  votre  ordinateur. 

4.  Connectez  le  cable  partant  de  1'arriere  de  1'ordinateur,  equipe  d'une  petite  fiche  12  V 
CC,  a  la  prise  situee  a  I'avant  du  moniteur. 
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FACE  AVANT  DU  MONITEUR 
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Connexion  de  1'ordinateur  a  un  boitier  d'adaptation  MP2 

Le  MP2  doit  se  trouver  a  droitc  de  Tordinateur. 

1 .  Assurez-vous  que  le  MP2  n'est  pas  branche  sur  secteur. 

2.  Connectez  la  fiche  DIN  a  6  broches-du  MP2  a  la  prise  MONITOR  situee  a  1'arriere 
de  1'ordinateur. 

3.  Connectez  la  fiche  5  V  CC  du  MP2  a  la  prise  5  V  DC  situee  a  1'arriere  de  1'ordinateur. 

4.  Connectez  la  prise  peritel  male  du  MP2  a  la  prise  peritel  femelle  de  votre  televiseur. 

5.  Connectez  la  fiche  12  V  CC  du  cable  partant  de  1'arriere  de  1'ordinateur  12  V  DC  a  la 
prise  situee  a  Tarriere  du  MP2. 


Cours  616memaire 
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Mise  sous  tension :  systeme  CPC6 128  et  GT65/CTM644 

(Si  vous  utilisez  votre  6128  avec  un  boitier  d'adaptation  MP2,  passez  directement  au 
chapitre  suivant). 

Apres  avoir  suivi  les  instructions  de  connexion  precedentes,  inserez  la  fiche  d'alimenta- 
tion  du  systeme  dans  la  prise  secteur  et  effectuez  la  mise  sous  tension.  Appuyez  alors  sur 
le  commutateur  POWER  situe  en  haut  a  droite  du  moniteur  lorsque  ce  commutateur 
n'est  pas  enfonce,  le  systeme  est  hors  tension. 

Mettez  I'ordinateur  sous  tension  a  1'aide  du  commutateur  POWER  situe  a  droite. 

Le  voyant  rouge,  en  haut  et  au  centre  du  clavier,  s'allume  tandis  que  le  texte  ci-dessous 
s'affiche  sur  l'ecran  du  moniteur : 


A«strad  128K  Microcomputer   <v3) 

€•1985  Anstrad  Consumer  Electronics  pic 
and  Locomotive  Software  Ltd. 


BASIC  1.1 
Ready 


Pour  eviter  de  vous  fatiguer  les  yeux  inutilement,  reglez  la  commande  de  brillance 
(BRIGHTNESS)  de  facon  a  obtenir  des  caracteres  facilement  lisibles  sans  eblouissement. 

Le  bouton  de  regiage  de  luminosite  BRIGHTNESS  se  trouve  a  I'avant  du  GT65  et  a 
droite  du  CTM644, 

Si  vous  utilisez  un  moniteur  monochrome  GT65,  vous  devez  regler  le  contraste  et  la 
hauteur  de  1'image  a  I'aide  des  boutons  CONTRAST  et  VERTICAL  HOLD,  situes  a  la 
partie  mferieure  de  sa  face  avant. 

Le  contraste  doit  etre  regie  au  minimum,  tout  en  permettant  une  lecture  facile  des  carac- 
teres. 
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Mise  sous  tension  :  CPC6128  et  Dottier  d'adaptation  MP2 

Apres  avoir  suivi  les  procedures  de  connexion  precedemment  decrites,  inserez  la  fiche 
d'alimentation  du  systeme  dans  la  prise  sectcur. 

Mettez  votre  televiseur  sous  tension. 

Mettez  I'ordinateur  sous  tension  a  1'aide  du  commutateur  POWER  situe  sur  la  droite. 

Le  voyant  rouge  situe  au  centre  du  clavier  doit  s'allumer  tandis  que  l'ecran  de  votre  televi- 
seur affiche : 


Anstrad  188K  Microcomputer   <v3> 

S198S  Anstrad  Consumer  Electroriics  plo 
and  Locomotive  Software  Ltd. 

BASIC  1.1 
Reads 


Reglez  votre  televiseur  de  facon  a  obtenir  une  image  optimale.  Les  caracteres  s'affichent 
en  jaune  sur  fond  bleu  fonce. 
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Autres  connexions : 

Si  vous  desirez  connecter  a  votre  systeme  d'autres  peripheriques,  tels  que : 

*  raanettes  de  jeu 

*  lecteur  de  cassettes 

*  imprimante 

*  unite  de  disque  suppiementaire 

*  enceintes/amplificateur  externes 

*  peripherique(s)  d'extension 

...vous  trouverez  de  plus  amples  informations  a  ce  sujet  dans  la  partie  2  du  cours  elemen- 
taire. 

En  dernier  ressort,  verifiez  que  vous  avez  bien  respecte  les  indications  mentionnees  au 
debut  du  manuel,  dans  la  rubrique  «  IMPORTANT  »  : 

REMARQUES  RELATIVES  A  L'INSTALLATION  :  1,  2,  3,  4,  5,  6,  7,  8 
REMARQUES  RELATIVES  AU  FONCTIONNEMENT  :  1 
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Partie  2  :  Connexion  de  vos  peripheriques 


Cette  partie  explique  comment  connecter  au  systeme  6128  les  divers  peripheriques  ou 
extensions.  Vous  trouverez  des  informations  concernant  1' utilisation  de  ces  peripheriques 
dans  les  parties  correspondantes  du  manuei. 

Manettes  de  jeu 

La  manctte  de  jeu  AMSTRAD  JY2  est  un  element  supplemental  re  dont  vous  pourrez,  si 
vous  le  desirez,  enrichir  votre  ordinateur  6128.  Utilisee  notamment  par  certains  pro- 
grammes de  jeu,  clle  sert  de  manche  a  balai  avcc  bouton  de  misc  a  feu. 

Connectez  la  fiche  de  la  manelte  a  la  prise  JOYSTICK  de  votre  ordinateur.  Vous  pouvez 
utiliser  deux  manettes ;  la  seconde  sera  alors  enfichee  dans  la  prise  de  la  premiere. 

II  est  egalement  possible  d'utiliser  la  manette  de  jeu  JYI  avec  le  6128. 

Vous  trouverez  de  plus  amples  informations  sur  les  manettes  de  jeu  plus  loin  dans  le 

manuei. 

Leeteur/enregistreur  de  cassettes 

Les  programmes  peuvent  etre  charges  et  sauvegardes  sur  cassettes  ou  sur  disques.  Vous 
trouverez  plus  loin  dans  le  manuei  les  commandes  gerant  ces  pheriphenques. 

Pour  connecter  un  leeteur/enregistreur  de  cassettes  a  votre  6128,  utilisez  le  cable 
AMSOFT  CL1  ou  un  cable  ^'interconnexion  standard  equivalent. 

Insercz  la  fiche  DIN  a  5  broches  du  cable  dans  la  prise  TAPE  de  l'ordinateur. 

Insercz  Pextrcmite  du  cable  bleu  dans  la  prise  REMOTE   ou  REM  (telecommande)  de 

votre  lccteur/cnregistrcur  de  cassettes. 

Inserez  I'extremite  du  cable  rouge  dans  la  prise  MIC,  COMPUTER  IN  ou  INPUT 
(entree  enrcgistrement)  de  votre  leeteur/enregistreur. 

Insercz  Textrcmite  du  cable  blanc  dans  la  prise  EAR  (ccouteur),  COMPUTER  OUT  (sor- 
tie ordinateur)  ou  OUTPUT  (sortie)  de  votre  leeteur/enregistreur. 
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La  qualite  de  transmission  des  donnees  entrc  le  6128  et  la  cassette  depend  largement 
des  niveaux  d'enregistrement  (LEVEL)  et  de  sortie  (VOLUME)  de  votre  lecteur/enre- 
gistreur.  Si  vous  ne  parvenez  pas  a  charger  ou  sauvegarder  vos  programmes  correcte- 
ment,  faites  varier  les  reglages  jusqu'a  obtenir  la  qualite  souhaitee. 

Imprimante 

Le  6128  peut  fonctionner  avec  toute  imprimante  parallele  compatible  Centronics. 
Pour  1'imprimante  AMSTRAD  DMPL  utilisez  le  cable  qui  i'accompagne. 

Si  vous  utilisez  une  autre  imprimante  compatible  Centronics,  procurez-vous  le  cable 

AMSOFTPLI. 

Connected  Pextremite  du  cable  equipee  d'un  connecteur  femelle  plat  au  connecteur  male 
PRINTER  silue  a  l'arriere  de  1'ordinateur. 

Connectez  ensuite  la  fiche  type  Centronics  de  ce  cable  dans  la  prise  situee  a  l'arriere  de 
rimprimante.  Si  les  deux  cotes  de  la  prise  de  Pimprimante  sont  dotes  d'agrafes  de  fixation, 
celles-ci  doivent  s'enclencher  dans  les  ouvertures  de  part  et  d'autres  de  la  fiche 
AMSTRAD. 

Le  fonctionnement  de  Pimprimante  est  decrit  en  detail  plus  loin  dans  le  manuel. 

Unite  de  disquette  supplementaire  (AMSTRAD  FD1) 

Vous  pouvez  ajouter  au  systeme  une  seconde  unite  de  disquette,  AMSTRAD  FD1.  Les 
a  vantages  d'un  systeme  a  deux  unites  de  disquette  apparaitront  nettement  aux  habitues 
de  CP/M,  car  de  nombreux  programmes  sont  prevus  pour  exploitation  avec  un  disque 
programme  insere  dans  une  unite  et  un  autre  disque  dans  une  seconde  unite  pour  le 
stockage  des  flchiers  de  donnees. 

L'exploitation  d'un  programme  sous  CP/M  necessite  toujours  son  chargement  a  partir 
d'une  disquette  (en  efiet,  le  BASIC  de  !a  ROM  n'est  pas  accessible).  CP/M  permet  Pexecu- 
tion  de  programmes  excedant  Pespace  memoire  disponible  grace  a  une  technique  de 
recouvrement  obligeanl  a  decouper  le  programme  en  plusieurs  fichiers.  II  est  possible  que 
le  nombre  de  fichiers  programme  conlenu  sur  la  disquette  soit  tel  qu'il  ne  reste  plus  de 
place  disponible  pour  les  donnees. 

Grace  a  la  souplesse  des  utilitaires  fournis  avec  le  systeme  6128  a  disquette,  vous  pou- 
vez effectuer  avec  une  seule  unite  de  disquette  toutes  les  manipulations  de  fichiers  dont 
vous  avez  besoin :  copie,  effacement,  etc.  Quoi  qu'il  en  soit,  une  seconde  unite  accelerera 
ces  operations  et  reduira  les  risques  de  mauvaises  manipulations. 

Pour  connecter  Punite  FDI  au  6128,  utilisez  le  cable  AMSOFT  DI2. 
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Le  connecteur  le  plus  large  du  cable  doit  s'inserer  dans  le  connecteur  DISK  DRIVE  2 
situe  a  I'arriere  de  l'ordinateur,  tandis  que  le  plus  etroit  vient  s'inserer  dans  le  connecteur 
situe  a  I'arriere  de  l'unite  FD1. 

N'OUBLIEZ  PAS  de  retirer  les  disquettes  des  unites  et  de  mettre  le  systeme  hors  tension 
avant  de  connecter  ou  deconnecter  la  deuxieme  unite  de  disquette.  Si  vous  effectuez  des 
connexions  alors  que  le  systeme  est  sous  tension,  vous  risquez  d'alterer  le  programme 
stocke  dans  la  memoire  de  l'ordinateur.  Avant  de  vous  attaquer  aux  connexions,  pensez 
toujours  a  sauvegarder  les  programmes  importants. 

Apres  connexion  de  l'unite  FD1  a  l'ordinateur,  mettez-la  sous  tension,  a  I'aide  de  son 
commutateur  arriere.  Mettez  ensuite  sous  tension  le  6128  a  I'aide  du  commutateur 
situe  a  sa  droite.  Les  voyants  rouge  et  vert  de  l'unite  FD1  doivent  alors  s'allumer,  indi- 

quant  que  l'unite  est  prete  a  fonctionner. 

Le  fonctionnement  de  la  seconde  unite  de  disquette  est  traite  en  detail  dans  une  partie 
ulterieure  du  manuel. 


Enceintes/amplificateur  exterieur 

Pour  apprecier  pleinemcnt  les  capacites  sonores  a  trois  canaux  de  votre  ordinateur,  vous 

pouvez  le  raccorder  a  un  amplificateur  muni  d'enceintes. 

Le  cable  d'entree  de  I'amplificateur  doit  se  terminer  par  une  fiche  jack  stereo  de  3,5  mm, 
que  vous  insererez  dans  la  prise  STEREO  dc  l'ordinateur. 

Voici  les  connexions  de  la  fiche  jack  : 

Canal  gauche  -  Extremite  de  la  fiche 
Canal  droit  -  Partie  centrale  de  la  fiche 
Masse  electriquc  -  Partie  arriere  de  la  fiche 

Le  6128  emet  alors  des  signaux  de  niveau  constant  par  la  sortie  STEREO:  e'est  a 
vous  qu'il  appartient  de  reglcr  le  volume  sonore.  la  balance,  les  aigus  et  les  graves  a  I'aide 
des  commandes  de  votre  amplificateur. 

Vous  pouvez  egalement  utiliser  un  casque  d'ecoute  a  forte  impedance,  dont  le  volume  ne 
sera  toutefois  pas  reglable  a  partir  de  la  commande  VOLUME  de  l'ordinateur.  Quant 
aux  casques  a  faible  impedance  comme  ceux  qui  equipent  generalement  les  chaines  stereo, 
ils  ne  fonctionnent  pas  directement  sur  l'ordinateur. 

Une  partie  de  ce  manuel  est  d'ailleurs  consacree  a  1'acheminement  du  son  sur  les  dirTerents 
canaux  de  sortie. 
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Peripheriques  d'extension 

Vous  pouvez  egalement  connecter  des  peripheriques  d'extension  te!s  qu'interfaces  serie, 
modems,  crayons  lumineux,  cartes  ROM,  etc.,  sur  le  connecteur  EXPANSION  situe  a 

1'arriere  de  l'ordinateur. 

Cette  prise  recevra  aussi  !e  synthetiseur  de  parole/amplificateur  SSA2  AMSOFT.  .- 

Le  chapitre  «  Pour  information...  »  detaille  les  connexions  a  la  prise  EXPANSION. 

Verifiez,  pour  finir,  que  vous  avez  bien  suivi  les  avertissements  figurant  au  debut  de  ce 
manuel,  dans  la  rubrique  «  IMPORTANT  »  : 

REMARQUES  RELATIVES  A  LTNSTALLATION  :  6  et  7 
REMARQUES  RELATIVES  AU  FONCTIONNEMENT  :  4et  8 
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Partie  3  :  Les  disquettes 


[  c  M2*  utilise  des  disquettes  compactes  de  format  3  pouces.  Nous  vous  conseillons 
vr^mem.  pour  unc  question  dc  fiabililc.  de  n'uliliscr  que  des  CF-2  (Compact  Floppy) 
.:'  W1SOFT.  Cependani.  les  disquettes  3  pouces  des  principalis  fabricams  peuvent  egale- 

-■.eiT.  con ven ir. 


Insertion 

Chaquc  lace  de  la  disquettc  pcut  etrc  utilisee  separcment.  La  disqueuc  doit  etrc  inseree 
avec  son  etiquette  vers  1'extericur  et  la  face  que  vous  voulez  mi  User  dirigee  vers  1c  ha  tit. 


Protection  en  ecriture 

Le  coin  gauche  de  chaque  face  d'une  disquette  porte  une  fleche  montrant  un  trou  muni 
d'un  obturateur.  C'est  le  trou  de  protection  en  ecriture  qui  vous  empeche  d'effacer  ou 
d'ecrire  sur  des  donnees  qu'il  est  important  de  ne  pas  perdre. 

Systeme 
de  protection 


Quand  le  trou  est  ferme,  l'ordinateur  peut  ecrire  sur  la  disquette.  Quand  le  trou  est  ouvert, 
rien  ne  peut  etre  ecrit,  vous  protegeant  contre  tout  effacement  accidentel  de  programmes 
importants. 

Les  fabricants  de  disquettes  emploient  des  precedes  differents  pour  l'ouverture  et  la  fer- 
meture  des  trous  de  protection.  Pour  la  CF-2  d'AMSOFT,  suivez  les  instructions  ci-des- 
sous : 


Pour  ouvrir  le  trou  de  protection,  abaissez  l'obturateur  situe  sur  le  coin  gauche  de  la  dis- 
quette. 


Trou  de  protection  (OUVERT) 


Taquet         J J  i 
OUVERT  "^ 


Prot6ge  contre 

I'ecriture 


Taquet  _[TT 
FERME"^ 


Non  protege 


Pour  fermer  le  trou  de  protection,  relevez  l'obturateur. 
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"«SS 


Certains  autres  modeles  utilisent  un  petit  levier  en  plastique  situe  dans  une  fente  du  coin 
gauche. 


i  H 


Trou  de 

protection 

(FERME) 


Pour  ouvrir  le  trou  de  protection  sur  ce  genre  de  disquette,  il  faut  faire  glisser  le  levier 
vers  le  milieu  de  la  disquette  en  utilisant  la  pointe  d'un  stylo,  par  exemple. 


Deplacer  le 
levier  vers  le 
milieu  du 

disque 


Trou  de 

protection 

(OUVERT) 


t 


Quelle  que  soit  la  procedure  employee,  il  faut  done  ouvrir  le  trou  de  protection  si  vous 
voulez  eviter  de  perdrc  vos  programmes  ou  vos  donnees  en  ccrivant  par-dessus. 


IMPORTANT 

Assurez-vous  toujoars  que  les  trous  de  protection  de  votre  disquette  systeme  CP/M  sont 
ouverts. 
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Quand  la  disquette  est  a  I'interieur  de  I'unite  de  disquette 

Sur  le  devant  de  I'unite  de  disquette  se  trouvent  un  voyant  rouge  et  un  bouton-poussoir 
pour  1'ejection  des  disquettes. 


Voyant        -L 
indicateur 


I 


Bouton 

poussoir 


iLrui/uinimnjumnruuui 


l£  voyant  indicateur 

Ce  petit  voyant  rouge  a  deux  fonctions  :  Si  une  seule  unite  de  disquette  est  connectee,  le 
voyant  indique  que  des  donnees  sont  lues  ou  ecrites  sur  la  disquette.  Si  deux  unites  de 
disquettes  sont  connectees,  le  voyant  de  I'unite  B  sera  toujours  allume,  vous  permettant 
ainsi  d'identifier  les  unites  rapidement.  Cependant,  Iors  d'une  operation  (lecture  ou  ecri- 
ture)  de  I'unite  A,  le  voyant  de  I'unite  B  doit  s'eteindre. 


Le  bouton-poussoir 

II  vous  permet  d'ejecter  la  disquette  de  son  unite. 

IMPORTANT 

1.  TOUJOURS  EN  LEVER  VOTRE  DISQUETTE  DE  L'UNITE  AVANT  D'ALLU- 
MER  OU  D'ETEINDRE  VOTRE  SYSTEME. 

2.  NE  JAMAIS  ESSAYER  D'EJECTER  UNE  DISQUETTE  PENDANT  UNE  OPE- 
RATION DE  LECTURE  OU  D'ECRITURE  SUR  CETTE  DISQUETTE,  CE  QUI 
POUR  RAIT  ENTRAINER  LA  DESTRUCTION  DES  DONNEES  S'Y  TROU- 

VANT. 

3.  LA  DISQUETTE  MAGNETIQUE  EST  PROTEGEE  PAR  UNE  ENVELOPPE  DE 
PLASTIQUE  DUR.  ATTENTION  A  NE  PAS  TOUCHER  A  LA  DISQUETTE 

ELLE-MEME. 
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Partie  4  :  Informations  prealables 


Avant  de  passer  au  chargement  des  logiciels  et  a  la  sauvegarde  des  programmes  sur  dis- 
quettes,  attardons-nous  sur  le  clavier.  Ceux  qui  ont  l'habitude  des  miero-ordinateurs  peu- 
vent  sauter  cette  partie. 

L'ordinateur  est  sous  tension  ct  le  message  initial  affiche  :  voyons  maintenant  ies  fonc- 
tions  des  differentes  touches  du  clavier. 


4-         *         -* 


Les  touches  dc  displacement  du  curseur  6  o  00,  situees  en  haut  et  a  droitc  du  clavier, 
permettent  dc  fairc  cvoluer  le  curseur,  petit  bloc  homogene.  en  differents  points  de 
I'ccran. 

Appuyez  tour  a  tour  sur  chaque  touche  de  deplacement  et  observez  le  deplacement  du 
curseur. 


RETURN 


La  touche  [RETURN]  permet  d'entrer  dans  la  memoire  de  l'ordinateur  les  informations 
que  vous  venez  de  taper.  Vous  devez  appuyer  sur  ccttc  touche  apres  chaque  instruction 
tapee  au  clavier  :  aussitot.  une  nouvelle  ligne  commence  a  lecran. 

A  partir  de  maintenant,  quand  vous  verrez  [RETURN],  cela  voudra  dire  appuyez  sur  la 

touche  [RETURN]  apres  chaque  instruction  ou  ligne  de  programme. 
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En  conditions  normales  de  fonctionnement  (par  defaut),  cette  touche  a  les  memes  effets 
que  [RETURN]  et  peut  se  substituer  a  elle.  Toutefois,  a  Pinstar  des  touches  de  fonction 
du  clavier  numerique,  les  fonctions  de  la  touche  [ENTER]  peuvent  etre  redefinies.  Cette 
question  sera  abordee  utterieurement. 


DEL 

Cette  touche  est  utilisee  pour  effacer  un  caractere  a  gauche  du  curseur  (par  exemple  une 

lettre  ou  un  nombre)  que  vous  ne  vouJez  pas  conserver. 

Tapez  abed  ;  la  lettre  d  se  trouve  a  gauche  du  curseur.  Si  vous  decidez  que  vous  ne  voulez 
pas  de  cette  lettre,  appuyez  sur  la  touche  [DEL]  une  fois  et  la  lettre  d  disparait.  Si  vous 

continuez  a  appuyer  sur  cette  touche  [DEL],  les  lettres  abc  disparaitront  aussi. 


II  y  a  deux  touches  [SHIFT].  Si  vous  appuyez  sur  1'une  des  deux  et  la  maintenez  appuyee 
pendant  que  vous  tapez  un  autre  caractere,  une  majuscule  ou  le  symbole  superieur  de  la 
touche  s'affiche  sur  1'ecran. 

Tapez  la  lettre  e,  puis  appuyez  sur  [SHIFT]  (en  maintenant  cette  touche)  et  tapez  sur  la 
lettre  e  de  nouveau.  Sur  1'ecran  vous  verrez : 

eE 

Tapez  maintenant  quelques  espaces  en  maintenant  la  barre  d'espacement  appuyee. 
Essayez  avec  les  touches  du  haut  du  clavier,  au-dessus  des  lettres.  Tapez  le  chiffre  2,  puis 
appuyez  sur  [SHIFT]  et  tapez  le  chiffre  2  de  nouveau.  Vous  obtenez  sur  1'ecran  : 

2" 

Vous  pouvez  maintenant  voir  ce  qui  arrive  quand  vous  appuyez  sur  la  touche  [SHIFT] 
tout  en  tapant  un  caractere.  Essayez  en  tapant  chacune  des  touches,  d'abord  toutes 
seules,  puis  en  appuyant  sur  la  touche  [SHIFT]  en  meme  temps. 
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CAPS 
LOCK 

Cette  touche  a  le  meme  effet  que  la  touche  [SHIFT],  excepte  qu'il  suffit  de  la  prcsser  une 
fois.  Toutes  les  lettres  seront  affichees  en  majuscules,  sauf  Ies  touches  numeriques  qui 
resteront  des  chiffres.  Appuyez  simultanement  sur  [CONTROL]  et  [CAPS  LOCK]  puis 
tapez : 

abcdef 123456 

Sur  l'ecran  vous  voyez  :  ■ 

ABCDEF123456 

Et  les  chiffres  ont  ete  tapes  tels  quels.  Maintenant,  si  vous  appuyez  sur  [S  HI  FT]  en  meme 
temps,  vous  aurez : 

abcdef 123456 

Pour  revenir  aux  minuscules,  appuyez  de  nouveau  sur  [CAPS  LOCK]. 


CAPS 
LOCK 

Pour  taper  les  majuscules  et  les  symboles  supericurs  des  touches  sans  avoir  a  presser 
continuellement  sur  [SHIFT],  appuyez  sur  [CONTROL],  puis  sur  [CAPS  LOCK].  Mainte- 
nant tapez : 

abcde*123456 
Vous  verrez  apparaitre  : 
ABCDEF! "#$U 

II  est  egalement  possible  de  taper  des  chiffres  sur  le  pave  numerique  de  droite  du  clavier 
(fO  a  »). 
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Si  vous  maintenez  la  touche  [CONTROL]  enfoncee  et  appuyez  une  fois  sur  [CAPS  LOCK], 
vous  revenez  a  l'etat  precedent,  majuscules  ou  minuscuJes.  Si  vous  etes  toujours  en  majus- 
cules, appuyez  sur  [CAPS  LOCK]  une  fois  pour  revenir  en  minuscules. 


Cettc  touche  sert  a  effacer  un  caractere  qui  se  trouve  sous  le  curseur.  Tapez: 
ABCDEFGH.  Lc  curseur  est  a  droite  du  (H).  Puis  appuyez  quatre  fois  sur  le  curseur 
gauche  <3.  Le  curseur  se  superpose  a  la  Icttre  E.  Note?  que  la  Iettre  E  est  toujours  visible 
sous  le  curseur.  Appuyez  sur  la  touche  [CLR]  une  fois  et  vous  verrez  que  la  Iettre  E  a  ete 
eflfacee  et  que  les  lettrcs  FGH  se  sont  deplacces  d'une  case  vers  la  gauche  tandis  que  la 
Iettre  F  sc  trouve  sous  le  curseur.  Appuyez  sur  la  touche  [CLR]  sans  la  Iacher.  Les  lettres 
F,  puis  G  et  H  disparaissent. 


r 

ESC 

Cette  touche  bleue  en  haut  du  clavier,  a  gauche,  pcrmet  dc  prendre  la  poudre 

d'ESCampette,  autrement  dit  d'interrompre  momentanement  un  programme  en  pressant 
la  touche  une  fois  et  de  le  reprendre  en  tapant  une  autre  touche,  ou  d'arreter  complete- 
ment  en  appuyant  encore  une  fois  sur  [ESC]. 

Appuyez  maintenant  deux  fois  de  suite  sur  ia  touche  [ESC].  L'ordinateur  est  a  nouveau 

pret  a  accepter  de  nouvelles  instructions. 


IMPORTANT 

Quand  vous  arrivez  au  bord  droit  de  1'ecran  en  tapant  plus  de  40  caracteres,  le  caractere 
suivant  passe  automatiquement  a  la  ligne  suivante.  Cela  veut  dire  qu'il  NE  FAUT  PAS 
presser  [RETURN],  a  1'instar  des  habitues  des  machines  a  ecrire,  qui  tapent  RETOUR  ou 
ENVOI  a  la  fin  d'une  ligne. 

L'ordinateur  s'en  charge  automatiquement  et  reagit  a  un  [RETURN]  non  prevu  par  un 
message  d'erreur  -  (d'habitude  Syntax  error)  -  soit  immediatement,  soit  quand  vous  lan- 
cez  Pexecution  du  programme. 
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Syntax  Error  (ou  erreur  de  syntaxe) 

Si  le  message  Syntax  error  apparait  sur  I'ecran,  l'ordinateur  vous  dit  qu'il  ne  comprend 
pas  une  des  instructions  que  vous  avez  tapees.  Par  exempie,  si  vous  tapez : 

printt    [RETURN] 

...le  message  suivant  apparait : 

Syntax  error  ■'"  '■■■■' 

Car  l'ordinateur  ne  connait  pas  la  commande  printt. 

Si  vous  vous  trompez  dans  une  ligne  de  programme  comme  : 

10  printt    "abc"    [RETURN] 
...le  message  Syntax  error  n'apparaitra  que  lors  de  I'execution  du  programme. 
Tapez : 

run    [RETURN] 

Cette  commande  ordonne  ['execution  du  programme  que  vous  venez  d'entrer  en 
memoire. 

Sur  I'ecran  vous  voyez  : 

Syntax    error    in    10 
lBQrintt  ."abc" 

Ce  message  vous  dit  dans  quelle  ligne  se  trouve  I'erreur  et  vous  presente  la  ligne  du  pro- 
gramme avec  le  curseur-editeur  afin  que  que  vous  puissiez  corriger  I'erreur. 

Appuyez  sur  le  curseur  droit  c>  jusqu'a  ce  que  le  curseur  soit  au-dessus  du  t  de  printt ; 
pressez  la  touche  [CLR]  pour  enlever  le  t  superflu,  puis  pressez  [RETURN]  pour  introduire 
la  ligne  correcte  dans  l'ordinateur. 

Tapez : 

run    [RETURN] 
...et  vous  verrez  que  l'ordinateur  a  accepte  1'mstruction  en  affichant : 

abc 

Pour  terminer,  verifiez  que  vous  avez  bien  respecte  les  avertissements  figurant  au  debut 

du  manuel,  dans  la  rubrique  «  IMPORTANT  »  : 

REMARQUES  RELATIVES  A  [.'INSTALLATION  :  4  et  5 
REMARQUES  RELATIVES  AU  FONCTIONNEMENT  :  1 
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Partie  5 :  Chargement  des  logiciels  et  des 
jeux... 

Bienvenuc  aux  utilisateurs  qui  abordent  directement  cette  partie ! 

Pour  experimenter  la  vitesse  de  chargement  des  logiciels  sur  disquette,  mettez  le  systemc 
sous  tension  et  inserez  l'une  des  disquettes  CP/M  dans  1' unite,  face  4  vers  le  haut. 

Tapez: 

run   "rointi«ie,ci«#"    [RETURN] 

Au  bout  de  quelques  secondes,  le  programme  est  charge  en  memoire.  Repondez  a  la  ques- 
tion affichee  a  Pecran,  confirmant  que  vous  utilisez  bien  un  moniteur  vert  (tapez  Y  pour 
Oui  et  N  pour  Non).  Vous  verrez  alors  apparaltre  une  demonstration  du  jeu  «  Roland  in 
Time  ».  Elle  vous  incitera  peut-etre  a  acheter  une  copie  du  jeu... 

Apres  cette  demonstration,  vous  pouvez  sortir  du  programme  en  appuyant  sur  la  touche 
[ESC]  tout  en  enfoncant  les  touches  [CONTROL]  et  [SHIFT].  Vous  reinitialise*  ainsi  votre 

systeme  afin  de  lancer  une  nouvelle  application  sans  avoir  besom  d'enlever  la  disquette 
de  son  unite. 

Si  le  programme  n'est  pas  charge,  un  message  d'erreur  vous  indique  Panomalie  : 

Drive  A:  Disc  missing 
Retry,  Ignore  or  Cancel? 

...signifie  que  vous  n'avez  pas  insere  la  disquette  correctement  ou,  si  vous  disposez  d'une 
deuxieme  unite  de  disquette,  que  vous  l'avez  inseree  dans  Punite  B, 

ROINTIME.DEH  not  found 

...indique  que  vous  n'avez  pas  insere  la  bonne  disquette  (ou  la  bonne  face)  ou  que  vous 
avez  fait  une  erreur  en  tapant  le  nom,  ROINTIM  E,  DEM. 

Bad   command 

...signifie  que  vous  avez  mal  tape  ROINTIM  E. DEM  en  inserant  un  espace  ou  un  signe 

de  ponctuation  superflu. 
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Type  mistatch 
...signifie  que  vous  avez  oublie  les  guillemets. 
Syntax    error 

...vous  avez  fait  une  erreur  en  tapant  run. 

Drive  A:  read  fail 
Retry,  Ignore  or  Cancel? 

sans  la  retirer. 

Lorsque  vous  saurez  dupliquer  une  disquette,  n'oub.iez  jamais  de  copier  les  programmes 

importants,  notamment  le  CP/M. 

Chargement  da  logiciel  AMSOFT  et  du  programme  «  BIEN VENUE  » 

Nous  esperons  avoir  suscite  votre  interet  pour  rinformatique,  passons  maintenant  a  un 
jeu... 

Inserez  votre  disquette  dans  1'unite  et  tapez : 
ran    "disc"    [RETURN] 

Au  bout  de  quelques  seconder  le  jeu  est  charge  et  vous  pouvez  commences 

Tapez  •  run  »  disc  »  apres  avoir  insere  Tune  des  disquettes  CP/M  dans  .'unite,  face  4 
verfle  haut,  ce  qui  declenche  une  demonstration  de  «  Btenvenue  ». 

Apres  cette  demonstration,  reinitialise*  votre  systeme  a  I'aide  des  touches  [CONTROL], 
[SHIFT]  ct  [ESC]. 

quette  du  logiciel. 

Pour  terminer,  verifiez  que  vous  avez  bien  suivi  les  avertissements  figurant  au  paragraphe 

«  IMPORTANT  »  du  debut  de  ce  manuel. 

RFMAROliFS  RELATIVES  A  ^INSTALLATION:  6 

rImaRQUES  RELATIVES  AU  FONCTIONNEMENT  :  1.  5,  6 
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Partie  6  :  Passons  a  la  programmation... 


Jusqu'ici,  nous  avons  vu  ce  qu'il  faut  faire  et  ne  pas  faire,  comment  installer  l'ordinateur 
et  connecter  les  peripheriques.  Nous  avons  appris  a  charger  les  logiciels  et  a  utiliser  cer- 
taines  touches  du  clavier.  Nous  allons  maintenant  apprendre  a  utiliser  des  instructions 
pour  faire  bouger  les  choses... 

Comme  vous  et  moi,  l'ordinateur  ne  comprend  les  instructions  que  dans  la  langue  qu'il 
connait.  Ce  langage  s'appelle  le  BASIC  (abrcviation  de  Beginners'  All-purpose  Symbolic 
Instruction  Code).  Les  mots  du  BASIC  sont  des  «  mots  cles  »  communiquant  chacun  une 
fonction  particuliere  a  l'ordinateur.  Comme  tous  les  langages,  le  BASIC  obeit  a  des  regies 
de  grammaire.  Dans  ce  cas  precis,  la  grammaire  s'appelle  «  Syntaxe  »  et  l'ordinateur  a 
toujours  l'amabilite  de  vous  indiquer  vos  erreurs  de  syntaxe. 

Introduction  aux  mots  cles  du  BASIC  AMSTRAD 

Vous  trouverez  une  description  de  la  syntaxe  du  BASIC  AMSTRAD  dans  le  chapitre 
«  Liste  complete  des  mots  cles  du  BASIC  AMSTRAD  6128  ». 


CLS 

Pour  effacer  l'ecran,  tapez : 
ds    CRETURN] 

L'ecran  s'efface  et  le  mot  Ready  s'affiche  suivi  du  curseur  ■.  dans  Tangle  superieur 
gauche  de  l'ecran. 

Vous  pouvez  utiliser  indifferemment  les  MAJUSCULES  ou  les  minuscules  pour  entrer 
un  mot  cle  BASIC  dans  votre  ordinateur. 

PRINT 

Sert  chaque  fois  qu'il  est  necessaire  d'afficher  des  caracteres,  des  mots  ou  des  chiffres  sur 
l'ecran.  Si  vous  tapez  1'instruction  suivante  : 

print   "bonjour"    CRETUROO 
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Vous  voyez  apparaitre : 

bon jour 
Les  guillemets  ('*  ")  delimitent  le  message  que  Ton  desire  voir  apparaitre.  Vous  remar- 
querez  que  bonjour  est  apparu  sur  Pecran  aussitot  que  la  touche  [RETURN]  a  ete  frappee. 
Tapez : 

els    [RETURN] 

...pour  effacer  Pecran. 


RUN 

L'exemple  precedent  montrait  une  instruction  simple  d'une  seule  ligne.  L'instruction  a 
ete  executee  des  que  vous  avez  appuye  sur  la  touche  [RETURN],  puis  a  ete  oubliee.  II  est 
possible  de  stocker  une  serie  d'instructions  s'executant  scion  un  ordre  specifique,  que  Ton 
appelle  un  «  programme  ».  Les  instructions  qui  composent  un  programme  sont  de  merrte 
type  que  celles  que  nous  venons  de  voir,  mais  precedces  d'un  numero  de  ligne.  Les  nume- 
ros  de  ligne  d'un  programme  indiquent  a  l'ordinateur  r  ordre  d'execution  des  instructions. 
Lorsque  vous  appuyez  sur  [RETURN],  la  ligne  est  stockee  dans  la  memoire.  Tapez : 

10   print    "bonjour"     [RETURN] 

Vous  remarquerez  qu'apres  avoir  appuye  sur  [RETURN],  bonjour  ne  s'est  pas  affiche  a 
Pecran.  II  s'est  inscrit  dans  la  memoire  de  l'ordinateur  pour  former  un  programme  d'une 
ligne.  Pour  executer  ce  programme,  tapez : 

run    [RETURN] 

Vous  verrez  alors  bonjour  apparaitre  a  Pecran.  Vous  pouvez,  si  vous  le  desirez,  rcmpla- 
cer  PRINT  par  un  point  d' interrogation  : 

10   ?   "bonjour"    [RETURN] 

LIST 

Lorsqu'un  programme  a  ete  mis  en  memoire,  on  peut  verifier  ce  qu'on  a  tape  en  deman- 
dant sa  « liste  ».  Tapez : 

list    [RETURN] 

...et  vous  voyez  apparaitre : 
10  PRINT    "bonjour" 

...qui  est  le  programme  stocke  en  memoire. 
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Ayez-vous  remarque  que  le  mot  PRINT  est  maintenant  en  majuscules  ?  Cela  signifiequ'il 
a  ete  reconnu  par  I'ordinateur  en  tant  que  mot  cle  du  BASIC. 

Tapez :  els  [RETURN}  pour  effacer  I'ecran,  sans  supprimer  votre  programme  de  la 

memoire. 


GOTO 

Le  mot  cle  GOTO  demande  a  I'ordinateur  d'aller  d'une  ligne  a  une  autre  afin  d'en  sauter 

un  certain  nombre  ou  de  former  une  boucle,  Tapez : 

12  PRINT"honjour"  [RETURN] 
20  GOTO  10  [RETURN] 

...puis : 

run    [RETURN] 

Vous  voyez  alors  bonjour  s'afficher  sans  interruption,  ligne  apres  ligne,  la  ligne  20  du 
programme  demandant  a  I'ordinateur  de  reiourner  a  la  ligne  1 0  et  de  poursuivre  I'execu- 
tion. 

Pour  interrompre  momentanement  le  programme,  appuyez  sur  [ESC].  Pour  continuer, 
actionnez  n'importe  quelle  autre  touche.  Pour  I'arreter  completement,  actionnez  [ESC] 


deux  fois  de  suite. 
Faites : 

els    [RETURN] 
...pour  effacer  I'ecran. 


Pour  voir  le  mot  bonjour  s'afficher  sur  toute  la  ligne,  il  sufBt  de  mettre  un  point-virgule 
a  la  fin  de  la  ligne  10,  apres  les  guillemets. 


Tapez: 


18  PRINT"bonjour"!  [RETURN] 

20  GOTO  10  [RETURNJ 
run  [RETURN] 


Le  point-virgule  commande  a  I'ordinateur  d'afficher  le  prochain  groupe  de  caracteres 
immediatemeni  apres  le  precedent  (a  moins  qu'il  ne  soit  trop  long  pour  tenir  sur  la  ligne). 
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Quittez  ce  programme  en  appuyant  deux  fois  sur  [ESC].  Tapez  la  ligne  1 0  a  nouveau, 
mais  en  remplacant  le  point-virgule  (;)  par  une  virgule  (,). 

10  PRINT"bonjour"f  [RETURN] 
run  [RETURN! 

La  virgule  a  dcmande  a  1'ordinateur  d'afficher  le  prochain  groupede  caracteres  13  colon- 
nes  apres  le  debut  de  celui-ci.  Cette  fonction  permet  d'afficher  les  donnees  en  colonnes. 
Cependant,  si  1c  nombre  de  caracteres  indus  dans  un  groupe  depasse  12,  le  groupe  suivant 
est  decale  de  13  autres  colonnes.  afin  de  toujours  menager  un  cspace  entre  les  groupes  de 
caracteres. 

La  taille  de  ces  zones  de  13  caracteres  peut  etre  modifiee  par  la  commande  ZONE,  decrtte 
plus  loin  dans  le  manuel. 

Pour  sortir  du  programme,  appuyez  deux  fois  sur  [ESC].  Pour  vidcr  completemen,  la 
memoire,  remettez  1'ordinateur  a  Eero  en  appuyant  sur  [CONTROL],  [SHIFT]  et  iem,j, 

dans  cet  ordre. 


INPUT 

Cette  commande  sert  a  informer  1'ordinateur  qu'il  doit  attendre  que  Ton  ait  tape  quetque 
chose  avant  de  continuer.  Par  exemple  : 

IB  INPUT  "Quel  age  avez-vous"sage  [RETURN]  |    ^ 

20  PRINT"Vous  paraissez  nettement  moin&  que  vos";  age;  "arts. 

[RETURN] 

run  [RETURN] 

Sur  1'ecran  on  voit : 

Quel    age    avez-vous? 

Si  vous  donnez  votre  age,  meltons  18,  puis  [RETURN],  on  voit  alors  s'afficher : 

Vous  parraissez  netteaent  moins  que  vos  18  arts. 

Cet  exemple  montre  I'utilisation  de  la  fonction  input  et  d'une  variable  numerique. 
Le  mot  age  est  mis  en  memoire  a  la  fin  de  la  ligne  1 0  pour  que  l'ordinateur  1 1  associe  a 

tout  nombre  tape  apres  le  point  d'interrogation,  afin  dc  proceder  a  I'affichage  de  la  ligne 
20.  Bien  que  nous  ayons  utilise  le  mot  age  pour  la  variable  age,  nous  aunons  pu  aussi 
bien  prendre  la  lettre  a  ou  b... 
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Reinitialise!  1'ordinateur  avec  les  touches  [CONTROL]  [SHIFT]  et  [ESC].  Si  vous  vouliez 

1'entree  (INPUT)  de  caracteres  indetermines  (Iettres  ou  Iettres  et  chiffres),  le  signe  dollar 
($)  doit  etre  place  a  la  fin  de  la  variable.  Cette  variable  est  alors  appelee  «  variable 
chafne  ». 

Tapez  le  programme  suivant  (en  faisant  attention  a  mettre  un  espace  apres  le  r  de 
bonjour  et  avant  le  m  de  mon). 

10  INPUT  "Quel  est  ton  noiTjno**  CRETURN] 

20  PRINT"bonjour  ";nofn$5"  mon  nom  est  Roland"  [RETURN] 

run  CRETURN] 

Sur  I'ecran,  on  voit : 

Quel    est   ton   nom? 

Tapez  votre  nom  puis  [RETURN] 
Si  votre  nom  est  Fred,  vous  verrez  sur  I'ecran  : 
bonjour  Fred  non  no*  est  Roland 

Bien  que  nous  ayons  utilise  nom$  comme  variable  chaine,  nous  aurions  aussi  bien  pu 
utiliser  a$.  Nous  allons  maintenant  combiner  les  deux  exemples  precedents  en  un  seul 
programme. 

Faisons  a  nouveau  [CONTROL]  [SHIFT]  et  [ESC].  Puis  tapons  le  programme  suivant : 

5  CLS  CRETURN] 

10  INPUT  "Quel  est  ton  nom";a*  CRETURN] 

20  INPUT  "Quel  est  ton  age";b  CRETURN]  .. 

30  PRINT"Je  dois  dire   ";a$;"   que  tu  ne  fais  pas  tes";b; "arts. 

"  [RETURN] 
run  [RETURN] 


Dans  ce  programme,  nous  avons  utilise  deux  variables,  a$  pour  le  nom  et  b  pour  Page. 
Sur  I'ecran  on  voit : 

Quel  est  ton  nom? 

Tapez  votre  nom  (Fred)  puis  [RETURN].  La  question  suivante  apparait : 
Quel    est  ton   age? 

Tapez  maintenat  votre  age  (18)  puis  [RETURN]. 


, -'-   -'■  •-":—  • ■■-■■:  . — -..— m — .in.  ■• ;■■■  •■■-■i.-1>i£.-itoi-  ^1,>ft;,ivv;^.-T'^--? 
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ie  dois  dire  Fred   que  tu   ne   fais   oas   tes    13   ana. 


Editer  tm  programme 

Si  Tune  des  lignes  du  programme  a  ete  tapee  incorrectement,  entramant  le  message  Syn- 
tax error  ou  un  autre  message  d'erreur,  il  est  possible  de  1'editer  (autrement  dit  de  la 
modifier)  sans  avoir  a  la  rctaper.  Supposons  que  le  programme  precedent  ait  ete  mal 
tape : 

5  CLSS  (RETURN] 

18  INPUT  "Quel  est  to  nonT'sa*  [RETURN] 
20  INPUT  "Quel  est  ton  age";b  [RETURN! 
30  PRINT"Je  dois  dire"}a*i"  que  tu  ne  fais  pas  tes";b; "ans. " 

[RETURN] 

Trois  erreurs  se  sont  glissees  dans  le  programme  ci-dessus : 

Dans  la  ligne  5,  on  a  tape  clss  au  lieu  de  els 

Dans  la  ligne  1 0,  on  a  tape  to  au  lieu  de  ton 

Dans  la  ligne  30,  on  a  oublie  l'espacement  entre  dire  et  les  guillemets  (" ) 

II  existe  trois  methodes  pour  editer  un  programme.  La  premiere  consiste  a  retaper  entiere- 
ment  la  ligne.  Quand  une  ligne  est  retapee  et  entree  en  memoire,  elle  remplace  la  ligne  qui 
portait  le  meme  numero. 

La  deuxieme  methode  consiste  a  editer  a  I'aide  du  curseur. 

La  deraiere  est  appelee  Copy  Cursor,  autrement  dit  Copie  avec  I'aide  du  Curseur. 

Methode  d'edition  a  I'aide  du  curseur 

Pour  corriger  la  ligne  5,  tapez : 

edit  5  [RETURN] 

La  ligne  5  apparait  sous  la  ligne  30,  le  curseur  place  sur  le  c  de  clss. 

Pour  enlever  le  S  en  trop  dans  clss,  appuyez  sur  la  touche  curseur  droite  jusqu'a  ce  que 
celui-ci  soit  sur  le  dernier  s,  puis  appuyez  sur  la  touche  [CLR].  Le  s  a  disparu. 
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Appuyez  maintenant  sur  [RETURN] ,  afln  de  corriger  la  ligne  5  dans  la  memoire.  Tapez 

maintenant : 

list    [RETURN] 

...pour  verifier  que  la  ligne  5  est  correcte. 

La  commande  AUTO,  decrite  plus  loin,  peut  servir  a  editer  un  nombre  de  lignes  successi- 
ves  de  la  meme  maniere  que  la  methode  d'edition  a  l'aide  du  curseur. 

Methode  par  copie  avec  le  curseur 

Le  curseur  de  copie  est  un  deuxieme  curseur  qui  s'affiche  lorsque  vous  appuyez  simultane- 
ment  sur  [SHIFT]  et  sur  Tune  des  touches  du  curseur.  II  se  detache  du  curseur  principal 
et  peut  circuler  sur  1'ecran  de  maniere  autonome. 

Pour  corriger  les  fautes  des  lignes  10  et  30,  actionnez  et  maintenez  la  touche  [SHIFT] 
en  pressant  sur  la  touche  curseur  O,  jusqu'a  ce  que  le  curseur  soit  au  debut  de  la  ligne 
10.  Vous  voyez  que  le  curseur  principal,  en  bas,  n'a  pas  bougc.  Puis  pressez  la  touche 
[COPY]  jusqu'a  ce  que  le  curseur  soit  place  dans  l'espace  entre  to  ct  nom.  La  ligne  10 
est  reecrite  en  meme  temps  en  bas  et  le  curseur  principal  s'immobilise  a  la  meme  place 
que  le  curseur  de  copie.  Tapez  la  lettre  n.  qui  apparait  sur  la  ligne  du  bas  seulement. 

Le  curseur  principal  a  bouge  mais  le  curseur  de  copie  est  reste  a  sa  place.  Maintenant, 
appuyez  sur  la  touche  [COPY]  pour  afficher  la  totalite  de  la  ligne  10.  Pressez  [RETURN] 
a  fin  que  cette  nouvelle  ligne  1 0  soit  mise  en  memoire.  Le  curseur  de  copie  disparait  et  le 
curseur  principal  se  place  au-dessous  de  la  ligne  10.  Pour  corriger  la  deuxieme  faute, 
maintenez  la  touche  [SHIFT]  enfoncee  et  appuyez  sur  la  touche  curseur  0  pour  faire 
apparaitre  le  curseur  de  copie  au  debut  de  la  ligne  30. 

Appuyez  sur  [COPY]  jusqu'a  ce  que  le  curseur  de  copie  soit  superpose  aux  guillemets 
suivant  «  dire  ».  Appuyez  une  seule  fois  sur  la  barre  d'espacement.  Un  espace  va  s'intro- 
duire  sur  la  ligne  du  bas.  Continuez  d'appuyer  sur  la  touche  [COPY]  jusqu'a  ce  que  la 

ligne  30  soit  copiee.  Appuyez  sur  [RETURN] 

Vous  pouvez  demander  la  liste  du  programme  en  tapant : 

list    [RETURN] 

REMARQUE  :  Pour  deplacer  rapidement  le  curseur  (en  cours  d'edition)  a  I'extremite 
droite  ou  gauche  d'une  ligne,  maintenez  la  touche  [CONTROL]  et  appuyez  sur  une  des 
touches  flechees  <a  ou  O- 

Effectuez  la  remise  a  zero  avec  les  touches  [CONTROL],  [SHIFT]  et  [ESC]. 

IF 

Les  commandes  IF  et  THEN  demandent  a  l'ordinatcur  de  tester  une  condition  specifiee 
et  de  proceder  a  une  execution  en  fonction  du  resultat  du  test.  Par  exemple,  dans 
l'instruction  : 
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if   1+1=2  thtn  print  "vrai"   [RETURN] 
...Pordinateur  verifie  la  condition  1  +  1  =  2  et  affiche  «  vrai »,  le  cas  echeant. 

Le  mot  cle  ELSE  peut  servir  a  indiquer  ce  que  Pordinateur  doit  faire  si  la  condition  IF 

n'est  pas  remplie. 

H    1  +  1=0  then   print    "vrai"   tin  print    "faux"    [RETURN] 
Nous  allons  maintenant  prolonger  notre  programme  a  Paide  de  la  commande  IF  THEN. 

Tapez  le  programme  suivant,  en  remarquant  que  nous  introduisons  deux  symboles  nou- 
veaux  :  <  signifie  moins  grand  que  et  se  situe  a  cote  de  la  lettre  M,  >  signifie  plus  grand 
que  et  se  trouve  a  cote  du  signe  < ,  moins  grand  que. 

5  CLS  CRETURN] 

10  INPUT  "quel  est  ton  no*"sa*  [RETURN] 

28  INPUT  "quel  age  as~tu";age  [RETURN] 

30  IF  age  <  13  THEN  60  [RETURN] 

40  IF  age  <  20  THEN  70  [RETURN]  :  ' 

50  IF  age  >  20  THEN  BO  [RETURN] 

60  PRlNT"donc  ";a$;"  tu  n'est  pas  encore  un  adolescent  avec 

te5";age;"an5,";£ND  [RETURN] 

70  PR  INT  "done  ";a$;"  tu  es  un  adolescent  avec  te»";age; "ans. 

":END  [RETURN] 

80  PRINT"eh  bien  ";a$;"tu  n'est  done  plus   un   adolescent   a 

vec   tes"; age; "ans. " 

[RETURN] 

Pour  verifier  que  ce  programme  est  correct,  faites : 
list    [RETURN] 

...puis  tapez : 

run    [RETURN] 

Vous  pouvez  maintenant  repondre  aux  questions  de  Pordinateur  et  observer  ce  qui  se 

passe. 

Vous  pouvez  constater  les  effets  du  IF  (si)  et  du  THEN  (alors)  comme  commandes  dans 
un  programme.  Nous  avions  aussi  ajoute  le  mot  END  (fin)  a  la  fin  des  lignes  60  et  70. 
Ce  mot  reserve  END  est  utilise  pour  mettre  fin  a  un  programme.  S'il  n'etait  pas  la,  le 
programme  continuerait  a  avancer  et  afficherait  aussi  les  lignes  70  et  80. 
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Le  mot  END  a  ia  fin  de  la  Iigne  70  joue  Ie  meme  role.  Les  deux-points  (:)  avant  le  mot 

END  le  separent  de  l'instruction  precedente.  Les  :  sont  utilises  pour  separer  des  instruc- 
tions afin  d'en  mettre  plusieurs  sur  une  meme  ligne.  Nous  avons  aussi  ajoute  la  ligne  5 
pour  effacer  I'ecran,  comme  il  convient  de  le  faire  au  debut  de  chaque  programme,  pour 
rendre  les  choses  plus  claires. 

Remise  a  zero  avec  [CONTROL],  [SHIFT]  et  [ESC]. 


FOR  et  NEXT 

Nous  allons  utiliser  maintenant  les  commandes  FOR  et  NEXT. 

Les  commandes  FOR  et  NEXT  permettent  de  repeter  un  certain  nombre  de  fois  une 

action  definie  (boucle).  Le  groupe  d'instructions  a  repeter  doit  etre  delimite  par  FOR  et 
NEXT. 

Tapez: 

5  CLS  [RETURN] 

10  FOR  a=l  TO  10  [RETURN] 

20  PRINT"ACTION  executee" } a; Mf oi s"  [RETURN! 

30  NEXT  a  [RETURN] 

run  [RETURN! 

Vous  remarquerez  que  l'instruction  de  la  ligne  20  a  ete  executee  dix  fois,  comme  le  spe- 
cific la  commande  FOR  de  la  ligne  10.  Vous  constatez  egalement  que  la  valeur  de  la 
variable  est  incrementce  de  l  a  chaque  passage  dans  la  boucle. 

Le  mot  cle  STEP  peut  servir  a  definir  le  pas  de  la  commande  FOR  NEXT,  Par  exemple, 
vous  pouvez  remplacer  la  ligne  1 0  par  : 

10   FOR   a=10   TO   50   STEP   5   [RETURN] 
run   [RETURN] 

Vous  pouvez  aussi  fixer  des  pas  negatifs : 

10  FOR  a=100  TO  0  STEP  -10  [RETURN] 

run  [RETURN] 


REM 

REM  est  l'abreviation  de  REMark.  Cette  instruction  demande  a  1'ordinateur  d'ignorer 
tout  ce  qui  suit  sur  la  ligne  d'instruction.  REM  peut  ainsi  servir  a  introduire  des  informa- 
tions :  le  titre  d'un  programme  ou  1'utilisation  d'une  variable  par  exemple  : 

10  REM  Pan  sur  les  envahisseurs  [RETURN] 
20  V=5:REM  nosibre  de  vies  [RETURN] 
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L'apostrophe  (obtenue  en  appuyant  sur  [SHIFT]  et  sur  la  touche  7)  peut  remplacer  REM 


10  '  Pan  sur  les  envahisseurs  [RETURN] 
20  V  =  5'  nombre  de  vies  [RETURN] 


GOSUB 

Si  un  ensemble  destructions  doit  etre  execute  plusieurs  fois,  vous  pouvez  eviter  de  reta- 
per  les  instructions  en  creant  un  «  sous-programme  »  dont  1'appel  se  fait  grace  a  la  com- 
mande  GOSUB.  suivie  du  numero  de  ligne  requis.  La  fin  du  sous-programme  s'indique 
par  RETURN.  L'ordinateur  passe  alors  a  Instruction  qui  suit  immediatement  la  com- 
mande  GOSUB  qu'il  vient  d'executer. 

(Les  deux  programmes  suivants  ne  «  font  »  rien  d'autre  qu'afficher  des  mots  a  I'ecran. 

Comme  ils  ne  servent  qu'a  illustrer  Ie  fonctionnement  des  sous-programmes,  il  n'cst  pas 
indispensable  de  les  taper). 

Par  exemple,  dans  ce  programme  : 

18  MODE  2  [RETURN] 

20  PRINT"Darae  souris  trotte,"  [RETURN] 

30  PRINT"Noire  dans  le  oris  du  soir,"  [RETURN] 

40  pRINT"Dame  souris  trotte,"  [RETURN] 

50  PRINT"Grise  dans  Je  noir."  [RETURN] 
60  PRINT  [RETURN] 

70  PRINT"Un  nuage  passe,"  [RETURN] 
80  PRINT"  1 1  fait  noir  coffline  en  un  four"  [RETURN] 
90  PRINT"Un  nuage  passe,"  [RETURN] 
100  PRINT"Tiens,le  petit  jour  !"  [RETURN] 
110  PRINT  [RETURN] 

120  PRINT"Dame  souris  trotte,"  [RETURN] 
130  PRINT"Rose  dans  les  rayons  bleus,"  [RETURN] 
140  PRINT"Dame  souris  trotte,"  [RETURN3 
15B  PRINT"Debout  paresseux  "'  [RETURN] 
160  PRINT  [RETURN] 
-  170  PRINT"        P.Verlaine"  [RETURN] 
run  [RETURN] 
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...vous  pouvez  constater  qu'un  certain  nombre  de  lignes  reviennent  plusieurs  fois,  comme 
le  vers  de  la  ligne  190  et  celui  de  la  Iigne  210.  Creons  deux  sous-programmes  pour  les 
vers,  sans  oublier  RETURN  a  la  fin.  Ainsi,  nous  pouvons  appekr  les  sous-programmes 
a  1'aide  de  la  commande  GOSUB  190  et  GOSUB  21 0  chaque  fois  que  nous  voulons 
utiliser  le  vers.  Le  programme  prend  alors  cet  aspect : 


coflste    en    un    four"    [RETURN] 


10    MODE    2    [RETURN] 

20    GOSUB    190    [RETURN] 

30    PRINT"Noire  dans   le  gris   du   soir,"    [RETURN] 

40    GOSUB    190    [RETURN] 

50    PRINT"Grise   dans   le   noir,"    [RETURN] 

60    PRINT    [RETURN] 

70    GOSUB   210   [RETURN] 

80   PRINT"I1    fait   noir 

90    GOSUB    210    [RETURN] 

108    PRINT"Tiens,le   petit   jour    !"    [RETURN] 

110    PRINT    [RETURN] 

120    GOSUB    190    [RETURN] 

130    PRINT"Rose   dans   les   rayons   bleus,"    [RETURN] 

140    GOSUB    190    [RETURN] 

150    pRlNT"Debout   paresseux    !"    [RETURN] 

160    PRINT    [RETURN] 

170    PRINT"  P.Verlaine"    [RETURN] 

180    END    [RETURN] 

190    PRINT"Darae   souris   trotte,"    [RETURN] 

200    RETURN    [RETURN] 

210    PRINT"Un   nuaqe   passe,"    [RETURN] 

220    RETURN    [RETURN] 

run    [RETURN] 


Nous  avons  ainsi  gagne  un  temps  precieux  !  Les  sous-programmes  bien  penses  sont  une 
partie  essentielle  de  la  programmation.  lis  debouchent  sur  des  programmes  «  structures  » 
et  sont  un  bon  reflexe  de  programmation. 

Lorsque  vous  creez  des  sous-programmes,  rappelez-vous  qu'il  vous  est  possible  d'avoir 
plusieurs  points  d'entree.  Par  exemple,  un  sous-programme  occupant  les  lignes  500  a 
800  pourra  tres  bien  etre  aborde  au  point  500  (GOSUB500),  $40  (GOSUB 640) 
ou  790  (GOSUB790). 

Notez  l'importance  de  Pinstruction  END  a  la  Iigne  180.  Sans  elle,  le  programme  conti- 
nuerait  apres  la  ligne  1 70  et  executerait  la  ligne  1 90,  qui  ne  doit  Petre  que  par  Pinterme- 
diaired'un  GOSUB. 
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Arithmetique  simple 

Voire  ordinateur  peut  facilement  vous  servir  de  calculatrice.  Pour  en  assimiler  le  fonc- 
tionnement,  nous  vous  proposons  les  exercices  suivants.  La  reponse  sera  affichee  aussitdt 
.  que  la  louche  [RETURN]  sera  f rappee. 

Addition 

(utilisez  [SHIFT]  et ;) 

Tapez : 

?3+3    [RETURN] 
6  ..,-  .  .     ,     .... 

(Vous  n'avez  PAS  a  taper  le  signe  =) 
Tapez ; 

?8+4    [RETURN] 
12 


Sous  traction 

(Utilisez  =  pour  moins) 

Tapez : 


■,'r:--.   -r,;™J;l.  ,.:--,'f- 


?4-3    [RETURN] 

1 


Tapez: 


?ff-4    [RETURN] 
4 


Multiplication 

(Utilisez  [SHIFT]  et :  pour  multiplier  (*  signifie  x)) 

Tapez : 

?3I3  [RETURN] 
9 


't 


Tapez: 


?8*4  [RETURN] 
32 
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Division 

(Utilisez  /  pour  diviscr  sans  appuyer  sur  [SHIFT]). 
Tapez : 

■    ?3/3    [RETURN] 
1 

Tapez : 

?8/4    [RETURN] 
2 

Division  entiere 

(UUlisez  la  barre  \  pour  diviser  avec  suppression  du  reste) 

Tapez : 

?1B\A    [RETURN] 
1 

Tapez :  - 

?20\3    [RETURN] 
6 

Modulo 

(Utilisez  MOD  pour  obtenir  le  reste  d'une  division  entiere) 


Tapez : 


?10  MOD    4    [RETURN] 
2  T 

Tapez: 

?9    MOD    3     [RETURN] 

a 

Racine  carree 

Pour  trouver  la  racine  carree  d'un  nombre,  utilisez  sqr  ( ).  Le  nombre  dont  on  veut 

extraire  la  racine  doit  etre  entre  parentheses. 

Tapez : 


?«qr(16)    [RETURN] (ceci    veut   dire  vT?) 
4 
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Tapez: 


?sqr    (100)    [RETURN! 

10 


Puissances 

(Utilisez  ie  signe  |) 

Exemples  de  puissances :  3|2  (3  au  carre),  3|3  (3  au  cube),  etc. 

Tapez: 

?3t3  [RETURN]  (ceci  veut  dire  3;) 
27 


Tapez: 


?8t4  [RETURN!  (ceci  vtut  dire  8" 

4096 


Racines  cubiques 

Vous  pouvez  faciiement  calculer  les  racines  cubiques  en  adoptant  la  methode  ci-dessus : 

Pour  trouver  la  racine  cubique  de  27  ( 3V" 27) 
Tapez : 

?27fll/3)     [RETURN! 

Pour  trouver  la  racine  cubique  de  125 


Tapez : 


?125T(l/3)     [RETURN] 
5 


Cours  eiemen-aire 
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Calcub  composes 

(+,-,*,/)  »:<r-     :.-     .--*• 

Les  calculs  melangeant  addition,  multiplication,  etc.,  sont  compris  par  l'ordinateur,  mais 
il  faut  faire  attention  a  la  priorite  des  operateurs. 

La  priorite  va  a  la  multiplication,  suivie  de  la  division,  de  1'addition  et  enfin  de  la 
soustraction.  II  existe  cependant  d'autres  operateurs  dotes  de  priorites  differentes. 

Soit  le  calcul : 

3+7-2*7/4 

On  pourrait  penser  qu'il  se  fait  de  la  maniere  suivante : 

3+7-2   *7   /4 
«  8   *7   /4 

=   56/4 

=      14  ■'    ■  '       .      *--l    i?:-.-.:      ■■■■    -■■■■ 

La  realite  est  pourtant : 

3+7-2*7/4 

=3  +  7-14/4  .  lW,  ■ 

=3+7-3.5  ■'   ,.      ■.'.■.■■'  '■'■;-.=  :■ 

=10-3.5 

=6.5 

Pour  le  constater,  il  suffit  de  le  taper  : 

73+7-2*7/4  [RETURN]  .  . 

6.5 

On  peut  changer  la  maniere  dont  l'ordinateur  calcule  en  ajoutant  des  parentheses,  affec- 
tant  la  priorite  aux  operateurs  qu'elles  contiennent.  Par  exemple : 

?<3+7-2>*7/4   [RETURN] 
14 


I 
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Ordre  de  priorite  de  tous  les  operateurs  mathematiques  : 

f  Elevation  a  la  puissance 

MOD        Modulo 

Moins  unaire  (donne  le  negatif  d'un  nombre) 
*  ct  /  Multiplication  et  division 

\  Division  entiere 

+  et  -         Addition  et  soustraction 


Encore  des  puissances... 

Quand  on  veut  se  servir  de  tres  grands  ou  tres  petits  nombres  dans  les  calculs,  il  est 
quelquefois  utile  de  faire  appel  a  la  notation  scientifique.  La  lettre  E  est  utilisee  en  infor- 
matique  pour  les  exposants  des  nombres  en  base  10.  Vous  etes  Iibre  de  taper  E  ou  e,  sans 
oublier  que  pour  certains  mathematiciens.  e  peut  avoir  un  sens  different  dans  les  loga- 
rithmes  neperiens. 

Ainsi,  300  est  egal  a  3  x  102.  En  notation  scientifique,  on  ecrit  3E2.  De  meme,  0.03  est 
egal  a  3  x  10"2.  On  ecrit  3E-2.  Essayez  les  exemples  suivants. 


Tapez: 


?30*1B    [RETURN: 
300 


ou  bien : 


73EU1E1  [RETURN] 
308 

73000*1000  [RETURN]... ou...  73E3I1E3  [RETURN] 

3008000 

73000*0.801  [RETURN] ■ ..ou., .  73E3I1E-3  [RETURN] 
3 
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Partie  7 :  Sauvegarde 


Maintenant  que  vous  savez  taper  quelques  instructions,  vous  avez  suremertt  tres  envie  de 
sauvegarder  vos  programmes  sur  disquettes  cl  les  charger  dans  Pordinateur  a  partir  de 
ces  memes  disquettes. 

Meme  si  vous  savez  deja  sauvegarder  et  charger  des  programmes  sur  cassette,  vous  devez 
assimiler  queSques  notions  supplementaires  pour  effectuer  les  memes  operations  sur  dis- 
quette.  II  existe  essentiellement  deux  differences. 

Vous  ne  pouvez  pas  utiliser  une  disquette  vierge  comme  vous  le  feriez  pour  une  cassette. 
La  disquette  doit  tout  d'abord  etre  formatee. 

Vous  devez  «  nommer  »  vos  fichiers  disque  correctement.  Si  les  noms  de  fichiers  sur  cas- 
sette otaeissent  a  des  regies  tres  floues,  ceux  sur  disquette  doivent  au  contraire  se  confor- 
mer  strictement  aux  normes  CP/M,  detaillees  plus  loin  dans  ce  chapitre. 


Formatage  des  disquettes 

Avant  d'ecrire  des  donnees  sur  une  disquette  vierge,  il  faut  commencer  par  la  formater. 
Le  formatage  peut  etre  vu  comme  la  construction  d'une  serie  d'etageres  dotees  de  com- 
partiments  pour  le  stockage  des  informations  -  en  d'autres  mots,  une  structure  capable 

de  stocker  et  de  restituer  des  donnees. 

Le  formatage  partage  chaque  face  de  la  disquette  en  360  zones  distinctes : 

Piste  39 


Bottier 


Secteur 


Piste  0 
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La  disquette  comporte  40  pistes,  depuis  la  piste  0  (exterieure)  jusqu'a  la  piste  39  (inte- 
rieure).  Chaque  piste  se  divise  en  9  secteurs. 

Chaque  secteur,  quelle  que  soil  la  piste,  peut  contenir  512  octets  de  donnees,  soit  180 
Koctets  d'espace  disponible  sur  chaque  face  de  la  disquette. 

Premieres  etapes  pour  I'utilisation  des  diskettes  systeme  CP/M 

Avant  d'utiliser  une  disquette  vierge  pour  I'ccriture  et  la  lecture  de  vos  programmes, 
formatez-la  a  1'aide  de  la  face  1  d'une  des  disquettes  CP/M. 

Allumez  votre  systeme  et  inserez  la  face  1  d'une  des  disquettes  CP/M  dans  I'unite. 

S'il  s'agit  d'un  systeme  a  2  unites,  inserez  la  disquette  CP/M  dans  I'unite  principale  (Unite 
A). 

Puis  tapez:  - 

!cp*  [RETURN] 

(La  barre  verticale  s'obtient  avec  les  touches  [SHIFT]  et@). 
Apres  quelques  secondes,  Ie  message  suivant  apparait  sur  I'ecran  : 
CR/lt  Plus       Asistrad  Consumer   Electronics  pic 

Ce  symbole  indique  que  le  systeme  passe  sous  le  controle  de  CP/M  Plus. 

Le  symbole  A>  a  I'ecran  est  l'equivalent  du  Ready  sous  BASIC.  II  indique  que  1'ordina- 

teur  est  pret  a  recevoir  vos  instructions. 

Une  fois  sous  CP/M,  les  instructions  BASIC  ne  sont  plus  comprises  par  l'ordinateur. 
Si  vous  tapez  par  exemple  la  commande  BASIC  : 

els    [RETURN! 
...l'ordinateur  repond  en  repetant  le  mot  incompris,  suivi  d'un  point  d'interrogation  : 

CLS? 
...montrant  ainsi  qu'il  ne  comprend  pas  votre  commande. 


._>-^.. . 
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Abordons  maintenant  quelques  commandes  de  CP/M.  Tapez : 

dir    [RETURN] 

Vous  allez  voir  apparaitre  le  catalogue  des  COMmandes  et  utilitaires  du  CP/M.  L'un 
d'eux  est  DISCKIT3.  Tapez  : 

disckit3 

Au  bout  dc  quelques  secondes,  le  message  initial  du  DISC  KIT  s'affiche  en  haut  de 
l'ecran,  suivi  de  : 

One  drive  found 

indiquant  que  vous  cxploitez  1'utilitaire  DISC  KTTet  que  1'ordinateur  a  reconnu  1'utilisa- 
tion  du  sy steme  avec  une  seule  unite  dc  disqucttcs  (celle  qui  est  intcgree  a  l'ordinateur). 

Si  votre  systeme  comprend  une  unite  supplemental,  le  message  affiche  sera  : 
Two  drives   found 

Vous  verrez  alors  au  bas  de  l'ecran  : 


Copy 

Format 

Veri  f y 

Exit  from  program 


7 

4 

1 

0 

II  s'agit  du  menu  principal  du  DISC  KIT.  Les  numeros  inscrits  dans  les  cases  correspon- 
dent aux  touches  de  fonction  situees  a  droite  du  clavier  (f 0,  f1 ,  f4  et  f7).  Faites  votre 
selection  a  I 'aide  de  la  louche  voulue. 

Appuyer  sur  la  touche  de  fonction  10,  a  ce  stade  des  operations,  vous  fait  sortir  du  pro- 
gramme DISC  KIT  pour  vous  ramener  sous  le  systeme  CP/M  (message  A  >). 

Puisquc  nous  voulons  formater  une  disquette.  appuycz  sur  f4. 

ATTENTION 

LE  FORMATAGE  D'UNE  DISQUETTE  DEJA  ENREGISTREE  ENTRAINERA 
L'EFFACEMENT  DE  SON  CONTENU. 
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Un  nonvcau  menu  apparatt  alors  vous  proposant  plusieurs  formats : 

System  format 

Data  format 
Vendor  format 

Exit  menu 

Comme  preccdemment,  vous  ailez  appuyer  sur  une  des  touches  de  fonctions  (f 3,  f6  ou 
f9)  pour  selectionner  1c  type  de  format  souhaite.  Nous  reviendrons  par  la  suite  sur  ces 
differents  formats  :  pour  Ic  moment,  choisissons  le  format  Data,  soil  la  louche  f6. 

Appuyer  sur  la  louche  .  ,  situee  sous  f3.  f6  et  f9,  vous  fait  sortir  du  mode  Format  pour 
vous  ramener  au  menu  DISC  KIT. 

Apres  selection  dc  la  touche  de  fonction  6  (en  supposant  que  voire  systeme  ne  possede 

qu'une  seule  unite  de  disquette),  vous  recevez  a  I'ecran  le  message  : 


9 
6 
3 

• 


Format  as  Data 

Any  other  key  to  exit  menu 


Vous  devez  alors  retirer  la  disquette  systeme  CP/M  et  inserer  la  disquette  concernee.  la 

face  a  formater  tournee  vers  le  haul. 

Tapez  Y  (pour  «  oui  »,  a  savoir,  «  poursuivre  et  formater  la  disquette  »). 

Le  formatage  de  la  disquette  s'effectue.  piste  par  piste  (de  0  a  39),  et  le  numero  de  la  piste 

en  cours  de  formatage  s'affiche  dans  Tangle  superieur  gauche  de  I'ecran. 

Vous  ne  pouvez  pas  formater  une  disquette  dont  le  trou  de  protection  en  ecriture  est 
ouvert.  Si  vous  tentez  de  le  faire,  le  message  ci-dessous  vous  est  adresse  : 

Disc   writs-protected 
Insert   disc    to   format 
R-etry    or    C-ancel 

...  Tapez  alors  C  pour  annuler.  retirez  la  disquette  et  inserez-en  une  autre  formatable. 
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Veillez  a  ne  jamais  fermer  le  trou  de  protection  en  ecriture  d'une  disquette  dont  vous  sou- 
haitez  conserver  le  contenu.  C'est  NOTAMMENT  le  cas  des  disquettes  systeme  CP/M. 

Une  fois  le  formatage  termine,  1'ordinateur  vous  demande  de  retirer  la  disquette  et  d'ap- 
puyer  sur  une  touchc  quclconque  du  clavier  pour  poursuivrc. 

Aprcs  quoi  vous  pouvez  inserer  une  autre  disquette  a  formater  et  appuyer  de  nouveau  sur 
Y.  Vous  avez  la  possibility  de  repeter  cette  operation  autant  de  fois  que  vous  le  desirez. 

Apres  formatage  dc  loutes  vos  disquettes,  appuyez  sur  une  touche  quelconque  {a  1'exccp- 
tion  de  la  touche  Y)  pour  revenir  au  menu  principal  du  DISC  KIT. 

Nous  aborderons  les  options  Copy  et  Verify  ulterieurement.  Pour  1'heure,  maintenant 
que  nous  savons  formater  sous  CP/M.  nous  allons  reinitialiser  1'ordinateur  a  l'aide  des 
touches  [CONTROL],  [SHIFT]  et  [ESC]. 

Gardez  toujours  une  copie  dc  vos  disquettes  CP/M  en  lieu  sur  car  elles  sont  la  cle  de  voute 
de  votre  systeme.  Nous  vous  montrerons  par  la  suite  comment  faire  une  copie  dc  travail 
de  ces  precieuses  disquettes  de  facon  a  pouvoir  les  mettre  de  cote  soigneusement. 

Formatage  des  disquettes  dans  un  systeme  a  deux  unites 

Suivez  les  instructions  ci-dessus,  selectionnez  I'option  Format  du  menu  principal  du 
DISC  KIT  en  appuyant  sur  la  touche  de  fonction  f4,  puis  selectionnez  Data  format  au 

moyen  de  la  touche  f6. 

Vous  verrez  alors  s'afficher  un  troisieme  menu  d'options,  portant  sur  le  choix  de  I'unite 
a  partir  de  laquelle  vous  procederez  au  formatage  : 


Format  A : 
Format  B: 
Exit  menu 


8 

5 

2 

La  selection  de  I'option  Format  B  (touche  f  5),  vous  pcrmettra  de  laisser  votre  disquette 
systeme  dans  l'unite  A  (face  1  vers  le  haut) ;  vous  placercz  done  la  disquette  a  formater 
dans  1 'unite  B. 

Tapez  alors  Y  pour  proceder  au  formatage,  ou  sur  une  autre  touche  pour  revenir  au  menu 
principal  du  DISC  KIT. 


Chapitre  1    Page  42 


Cours  616mentaire 


Si  vous  avez  selections  I'option  Format  A  (touche  f 8)  vous  DEVEZ  retirer  la  disquette 
systeme  de  l'unite  A  et  la  remplacer  par  la  disquette  a  formater. 

N'OUBLIEZ  JAMAIS  DE  PROTEGER  LES  DISQUETTES  SYSTEME  CONTRE 
UN  ECRASEMEMT  ACCIDENTEL  DES  DONNEES  QU'ELLES  CONTIENNENT. 

Maintenant  que  nous  avons  formate  une  disquette  vierge  (ou  deux),  nous  pouvons  com- 
mencer  a  experimenter  les  commandes  de  gestion  des  disquettes  propres  au  BASIC. 

Sauvegarde  d'un  programme  sur  disquette 

Vous  avez  tape  un  programme  dans  la  memoire  de  Pordinateur.  Vous  voulez  le  sauvegar- 

der  sur  disquette.  Tapez  : 

save   "noniHch"   [RETURN] 
Remarquez  que  vous  devez  donner  un  nom  a  votre  programme. 

Un  nom  de  fichier  sur  disquette  se  compose  de  deux  parties  ou  zones.  La  premiere,  obliga- 
toire,  peut  contenir  jusqu'a  8  caracteres,  lettres  ou  nombres  (les  espaces  et  les  signes  de 
ponctuation  sont  interdits).  Cette  premiere  zone  contient  generalement  le  nom  du  pro- 
gramme. 

La  deuxieme  zone,  facultative,  peut  contenir  jusqu'a  trois  caracteres,  mais  cette  fois 
encore  ni  espace  ni  signe  de  ponctuation.  Ces  deux  parties  sont  separees  par  un  point. 

En  l'absence  d'une  deuxieme  zone  specifiee,  le  systeme  en  choisit  une  par  defaut,  .BAS 
pour  les  fichiers  BASIC  ou  .BIN  pour  les  fichiers  binaires  (en  code  machine). 

Comme  exemple  de  sauvegarde  sur  disquette,  ecrivez  un  petit  programme  dans  la 
memoire  de  1'ordinateur,  inserez  une  disquette  formatee  dans  l'unite  et  tapez : 

save    "exemple"    [RETURN] 

Apres  quelques  secondes,  le  message  Ready  apparatt  sur  1'ecran,  le  programme  est  main- 
tenant  sauvegarde  sur  la  disquette.  (Dans  le  cas  contraire,  verifiez  ce  que  dit  le  message 
d'erreur  sur  1'ecran.  La  disquette  peut  ne  pas  avoir  ete  inseree  dans  la  bonne  unite  ou  le 
trou  de  protection  en  ecriture  peut  etre  ouvert,  ou  encore  la  commande  avoir  ete  mal 
ecrite). 


Catalogue 

Apres  la  sauvegarde  du  programme  precedent,  tapez  : 

cat    [RETURN] 
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Vous  verrez  apparaitre : 
Drive  As    user  9 

EXEHPIE.BAS   IK 

177K  free 


Le  nom  du  programme  sera  affiche  avec  ses  deux  zones,  ia  deuxieme  ayant  ete  specifiee 
ou  non,  ainsi  que  Ia  longueur  du  programme  (arrondie  au  Ko  superieur),  L'espace  libre 
total  du  disque  sera  egalement  affiche. 


Chargement  d'un  programme  sur  disquette 

Les  programmes  sur  disquette  sont  charges  dans  la  memoire  de  l'ordinateur  a  I'aide  de  la 

comma  nde : 

load    "noftfich"    [RETURN] 
run    [RETURN] 

...ou  pour  un  demarrage  immediat : 

run   "nomfich"    [RETURN! 

Notez  au  passage  que  run  est  la  seule  commande  permettant  d'executer  des  programmes 

proteges. 


|  A  et  |  B 

Avec  un  systeme  a  deux  unites  de  disquette,  vous  devez  specifier  l'unite  (A  ou  B)  sur 
laquelle  vous  desirez  cxecuter  une  fonction.  Tapez  pour  cela  : 

!a  [RETURN] 
...ou  : 

!b  [RETURN] 

...avant  d'entrer  les  commandes  SAVE,  CAT  ou  LOAD. 
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Copie  de  programmes  de  disquette  a  disquette 

ssassssssassas 

destination). 

dans  l'autre  unite,  A  par  consequent ;  ce  qui  donne  ; 

ib  [RETURN] 

load  "nomfich"  [RETURN] 

!a  [RETURN] 

save  "nomfich"  [RETURN] 

Outre  la  methode  habitnelle  de  sauvegarde  de  fichiers  BASIC,  vdus  disposcz  de  quatre 

autres  methodes  de  sauvegarde  de  fichiers : 

run   "nom-fich"    [RETURN! 
...il  en  existe  trois  autres  destinees  a  des  applications  plus  specialisees. 


Fichiers  ASCII 

save  "noisHch", a '[RETURN! 

Le  suffixe  .a  demande  a  l'ordinatcur  de  sauvegarder  le  programme  ou  les  donnees .sous 
u  r™  h  >„„  fiohier  de  texte  ASCII.  Cette  methode  de  sauvegarde  s'applique  aux  fichiers 
deSlnt  de^tfetTd'autres  programmes  duplication.  Son  uti.isat.on  sera  abo, 
dee  ulterieurement  avec  les  applications  concernees. 


Fichiers  proteges 

save   "na«fich",p    [RETURN] 

I  e  suffixe   D  demande  a  Tordinateur  de  proteger  le  programme  c'est-a-dired'interdire 
son  SgefprShargement  ou  son  interruption,  par  la  touche  [ESC],  apres  demarrage. 
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Les  programmes  sauvegardes  de  cette  facon  ne  peuvent  etre  lances  que  directement,  a 
1'aide  des  commandes : 

save  "nomHch"  [RETURN! 
...ou : 

chain  "nosifich"  [RETURN] 

Si  vous  prevoyez  de  modifier  im  programme,  il  est  indispensable  d'en  garder  une  copie 

sous  forme  non  protegee,  done  sans  le  suffixe  «  ,p  ». 

Fichiers  binaires 

save  "  nomfich  ",b,  <adresse  de  depart>  ,  <nombre  d'octets>  [, 

<  point  d'entree  eventuel>]  [RETURN]  ? 

Cette  option  permet  d'effectuer  une  sauvegarde  binaire  qui  provoque  le  stockage  de  blocs 
entiers  de  donnees  de  la  RAM  sur  la  disquette,  tels  qu'ils  apparaissent  dans  la  memoire. 
II  est  necessaire  dans  ce  cas  d'indiquer  a  l'ordinateur  le  debut  de  la  zone  memoire  a  sauve- 
garder,  sa  longueur  et,  s'il  s'agit  d'un  programme,  I'adresse  memoire  a  partir  de  Iaquelle 
le  fichier  doit  s'executer. 


Vidage  d'ecran 

Cette  sauvegarde  binaire  permet  de  stocker  directement  sur  disquette  les  donnees  de  la 
memoire  ecran  sous  forme  d'un  vidage  d'ecran.  Le  contenu  de  l'ecran  est  alors  sauve- 
garde tel  qu'il  apparait  a  1'affichage,  a  l'aide  de  la  commande : 

save  "pagecran",b, 49152, 16384  [RETURN) 

49152  est  I'adresse  de  depart  de  la  memoire  ecran  et  16384  indique  la  longueur  de 
memoire  ecran  que  vous  desirez  sauvegarder. 

Pour  rappeler  ces  donnees  a  l'ecran,  tapez  : 

load  "pagecran"  [RETURN] 

Vous  trouverez  plus  loin  dans  le  manuel  des  informations  complementaires  sur  la  mani- 
pulation des  fichiers  programme  entre  disquettes/cassettes, 

Enfin,  assurez-vous  que  vous  avez  bien  respecte  les  avertissements  indiques  dans  la  rubri- 
que  « IMPORTANT  » : 

REMARQUES  RELATIVES  A  ^INSTALLATION  :  5,  6  et  7. 
REMARQUES  RELATIVES  AU  FONCTIONNEMENT  :  I,  2,  3,  4,  5,  6,  7  et  9. 
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Partie  8 :  Modes  couleurs  et  graphiques 


L'ordinateur  personnel  Amstrad  6128  dispose  de  trois  modes  d'afiichage  a  1'ecran : 

ModeO,  Mode  1  et  Mode  2. 

A  la  mise  sous  tension,  l'ordinateur  est  automatiquement  en  mode  1. 

Pour  comprendre  le  systeme  des  modes,  appuyez,  apres  la  mise  en  route,  sur  la  touche 
numerique  1.  Maintenez-la  enfoncee  jusqu'a  obtenir  deux  lignes  pleines  de  1.  Si  vous 
comptez  le  nombrc  de  1  d'une  ligne,  vous  verrez  qu'il  y  en  a  40 :  en  Mode  1,  il  y  a  40 
colonnes.  Appuyez  sur  [RETURN],  vous  aurez  le  message  «  Syntax  Error ».  Ne  vous 
inquietez  pas.  nous  avons  simplement  pris  le  plus  court  chemin  pour  revenir  au  message 
Ready, 

Tapez  alors : 

■ode  0  [RETURN] 

Vous  voyez  que  les  caracteres  sur  1'ecran  sont  plus  larges.  Appuyez  sur  le  chiffre  1  pour 
avoir  deux  lignes  pleines  de  I.  Vous  en  decomptez  20  par  ligne.  II  y  a  done  20  colonnes 
en  Mode  0.  Appuyez  sur  [RETURN]  de  nouveau. 

Et  tapez: 

mode   2    (RETURN! 

L'ecriture  est  plus  petite  dans  ce  mode ;  une  ligne  de  1  en  comprendra  80.  II  y  a  done  80 
colonnes  en  Mode  2. 

En  resume : 

ModeO  =  20  colonnes 
Mode  1  =  40  colonnes 
Mode  2  =  80  colonnes 

Tapez  [RETURN]  une  fois  de  plus. 
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Couleurs 

Vous  avez  le  choix  entre  27  couleurs.  Sur  un  moniteur  vert,  elles  apparaissent  en 
camaieux  de  vert.  Si  vous  disposez  du  moniteur  vert  GT65,  vous  pouvez  acheter  Padapta- 
teur  Peritel  pour  vous  servir  de  votre  televiseur  couleur. 

En  Mode  0,  on  peut  avoir  16  couleurs  en  meme  temps  a  Pecran. 
En  Mode  1,  on  peut  en  avoir  4. 
En  Mode  2,  on  peut  en  avoir  2. 

II  est  possible  de  changer  la  couleur  de  la  bordure  du  cadre  exterieur,  appelee  BORDER, 
la  couleur  de  1'espace  d'ecriture  appele  PAPER  el  la  couleur  du  stylo,  appele  PEN  (c'est- 
a-dire  la  couleur  des  caracteres),  independamment  les  unes  des  autres. 

Les  27  couleurs  disponibles  sont  indiquees  dans  le  Tableau  1,  chacune  avec  le  numero  de 

reference  de  la  couleur  (INK  =  encre). 

Pour  plus  de  commodite,  ce  tableau  (version  anglaise)  figure  en  haut  a  droite  de  Pordina- 

teur. 

Tableau  des  couleurs 


INK 

Couleur  de  I'encre 

INK 

Couleur  de  I'encre 

No 

No 

0 

Noir 

14 

Bleu  Pastel 

1 

Bleu 

15 

Orange 

2 

Bleu  Vif 

16 

Rose 

3 

Rouge 

17 

Magenta  Pastel 

4 

Magenta 

18 

Vert  Vif 

5 

Mauve 

19 

Vert  Marin 

6 

Rouge  Vif 

20 

Turquoise  Vif 

7 

Violet 

21 

Vert  Citron 

8 

Magenta  Vif 

22 

Vert  Pastel 

9 

Vert 

23 

Turquoise  Pastel 

10 

Turquoise 

24 

Jaune  Vif 

11 

Bleu  Ciel 

25 

Jaune  Pastel 

12 

Jaune 

26 

Blanc  Brillant 

13 

Blanc 

Tableau  !  :  Les  numeros  d'encre  (INK)  et  les  couleurs 

Comme  nous  le  disions  auparavant,  l'ordinateur  est  en  mode  1  a  Porigine.  Pour  y  revenir 
a  partir  d'un  autre  mode,  tapez  : 

mode    I    [RETURN] 
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Configuration  de  1'ecran 


STYLO 

BORDURE 
PAPIER 


BORDER  est  le  cadre  entourant  la  zone  d'ecriture  ou  PAPER.  (Au  depart,  BORDER 
et  PAPER  sont  bleus  tous  les deux).  Les caracteres  affiches  apparaissent  toujours  a  1'inte- 
rieur  du  cadre.  PAPER  designc  le  fond  sur  lequel  ils  s'affichent.  Le  stylo  (PEN)  colore 
les  caracteres. 

Nous  allons  maintenant  aborder  la  selection  des  couleurs  affichees  a  1'ecran  et  la  facon 
de  les  modifier. 

A  la  mise  sous'tension  ou  lors  d'une  reinitialisation,  le  cadre  est  toujours  de  la  couleur 
numero  1.  En  consultant  le  tableau  1,  vous  constaterez  que  c'est  la  couleur  bleue.  Pour 
modifier  la  couleur  du  cadre,  utilisez  la  commande  :  BORDER  suivie  du  numero  de  la 
couleur  selectionnee.  Pour  un  cadre  Wane,  tapez  ; 

border    13    (.RETURN] 
Pour  1'instant,  pas  de  probleme.  Compliquons  un  peu  l'exercice... 

A  la  mise  sous  tension  ou  a  la  reinitialisation,  les  numeros  PAPER  et  PEN  sont  automa- 
tiquement  selectionnes :  PAPER  =  0,  PEN  =  1.  Mais  ceci  ne  veut  PAS  dire  pour 
autant  que  les  couleurs  du  papier  et  du  stylo  sont  celles  du  tableau  l... 

En  effet.  PAPER  OetPEN  1  ne  sont  pas  des  parametresde  couleur.  Imaginez  que  vous 
disposiez  de  4  stylos  numerates  de  0  a  3  el  que,  pour  chacun  d'entre  eux,  vous  ayez  le 
choix  entre  27  couleurs  d'encre,  numerotees  de  0  a  26.  Vous  voyez  done  que  le  stylo 
numero  l  peut  prendre  plusieurs  couleurs.  Libre  a  vous,  bien  entendu,  de  choisir  la  merae 
couleur  d'encre  pour  les  quatre  stylos. 
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C'est  ce  qui  se  passe  avec  l'ordinateur.  A  l'aide  des  commandes  PEN  et  IN  K,  vous  pouvez 

selectionner  le  stylo  qui  vous  interesse  et  sa  couleur  d'encre. 

En  vous  rappelant  que  vous  operez  en  Mode  1  (40  colonnes),  consultez  le  tableau  2  ci- 
dessous  et  vous  verrez  dans  la  premiere  et  la  troisieme  colonne  que  le  stylo  numero  1 
correspond  a  la  couleur  numero  24.  Si  vous  vous  reportez  au  tableau  1,  vous  constaterez 
que  la  couleur  numero  24  est  jaune  vif ;  c'est  bien  la  couleur  des  caracteres  affiches  a  la 
mise  sous  tension. 

Couleurs  par  defaut 


N°de 

ModeO 

Mode  1 

Mode  2 

Papier/stylo 

Couleur  d'encre 

Couleur  d'encre 

Couleur  d'encre 

0 

1 

1 

I 

1 

24 

24 

24 

2 

20 

20 

1 

3 

6 

6 

24 

4 

26 

1 

I 

5 

0 

24 

24 

6 

2 

20 

1 

7 

8 

6 

24 

8 

10 

1 

1 

9 

12 

24 

24 

10 

14 

20 

1 

11 

16 

6 

24 

12 

18 

1 

1 

13 

22 

24 

24 

14 

cIignotementI,24 

20 

1 

15 

clignotementl6,ll 

6 

24 

Tableau  2.  Reference  PAPER/PEN/MODE/INK 
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Attention  !  Les  correspond ances  PAPER/PEN/INK  indiquees  au  tableau  2  ne  sont  pas 
fixes.  En  eflet,  il  ne  s'agit  la  que  des  couleurs  par  defaut,  selectionnees  a  la  mise  sous  ten- 
sion et  a  la  reinitialisation  de  1'ordinateur.  Vous  pouvez  les  modifier  a  l'aide  de  la  corn- 
mande  INK,  constitute  de  deux  parametres,  le  premier  pour  le  numero  du  papier  ou  du 
stylo  et  le  second  pour  le  numero  de  la  couleur  d'encre.  Une  virgule  separe  ces  deux  para- 
metres. 

Sachant  que  le  stylo  numero  1  est  selectionne,  nous  allons  changer  sa  couleur  d'encre 
pour  obtenir  des  caracteres  oranges. 

Tapez : 

ink  1,15  [RETURN] 

...les  caracteres  afnches  ont  effectivement  change  de  couleur. 

La  commande  INK  sert  aussi  a  modifier  la  couleur  du  fond.  Le  premier  numero  0  est 
selectionne  a  la  misc  sous  tension  ;  nous  allons  modifier  sa  couleur  pour  obtenir  un  papier 
numero  0  dc  couleur  verte  (numero  9) : 

ink  a, 9   [RETURN] 

Changeons  maintenant  de  stylo : 

pen   3    [RETURN]  ■  ..     -• 

Vous  remarquerez  alors  que  seuls  les  nouveaux  caracteres  (tapes  apres  la  commande) 
changent  de  couleur.  Avec  le  stylo  numero  3,  la  couleur  d'encre  initiale  est  rouge  vif 
(numero  6,  tableau  2).  Passons  a  la  couleur  rose  en  tapant : 

ink   3,le    [RETURN] 

3  est  le  parametre  du  stylo  selectionne  precedemment  par  la  commande  :  pen  3,  et  16 
correspond  a  la  couleur  d'encre  rose. 
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Changeons  maintenant  le  papier  (fond  sur  lequel  s'afficheront  les  caracteres).  Lorsque 
vous  selectionnez  un  nouveau  papier,  la coulcur  du  fond  ne change  que  pour  les  caracte- 
res afficb.es  apres  I'execution  de  eelte  commande.  Tapez : 

paper   2    [RETURN] 

Cette  fois  encore,  verifiez  sur  les  tableaux  1  et  2  que  le  numero  2  de  PAPER  correspond 

a  un  fond  turquoise  vif.  Colorez-le  en  noir  en  tapant : 

ink  2,0   [RETURN] 

L'ecran  affiche  maintenant  des  caracteres  ecrits  avec  les  stylos  1  et  3  sur  des  fonds  0  et 
2.  Vous  pouvez  selectionner  des  couleurs  INK  de  stylo  et  papier,  que  vous  n'etes  pas  en 
train  d'utiliser.  Tapez  par  exemple : 

ink    1,2    [RETURN] 

Les  caracteres  deja  tapes  avec  le  stylo  1  changent  de  couleur. 
Tapez : 

CIS    [RETURN] 

...pour  effacer  l'ecran. 

Vous  devez  etre  a  meme  desormais  de  revenir  aux  couleurs  d'origine  (cadre  et  fond  bleus, 
caracteres  jaunes  vif)  a  l'aide  des  commandes  BORDER,  PAPER,  PEN  et  INK. 
Essayez.  Si  vous  n'y  parvenez  pas,  reinitialisez  Pordinateur  a  l'aide  des  touches 
[CONTROL],  [SHIFT]  et  [ESC]. 

Couleurs  cu'gnotantes  (Flash) 

On  peut  faire  alterner  les  caracteres  d'une  couleur  a  l'autre  en  utilisant  un  autre  numero 
de  couleur  pour  la  definition  INK  de  la  commande  PEN. 

La  couleur  des  caracteres  va  changer  rapidement  entre  le  blanc  brillant  et  le  rouge  vif. 
Reinitialisez  a  l'aide  des  touches  [CONTROL],  [SHIFT]  [ESC]  et  tapez  : 

ink    1,26,6    [RETURN] 
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I  correspond  au  numero  du  stylo  (PEN).  26  aii  Wane  brillant  et  6  a  La  couleur  qu'il  va 
prendre,  rouge  vif. 

II  est  egalemenl  possible  de  faire  clignoter  le  fond  PAPER  d'une  couleur  a  l'autre.  Vous 
devez  alors  ajouter  a  la  commande  INK  un  numero  dc  couleur  supplemental. 

Pour  faire  clignoter  PAPER  entre  vert  et  jaune  vif,  tapez  : 

ink    0,9,24    [RETURN] 

0  correspond  au  numero  du  papier  PAPER,  9  au  vert  et  24  au  jaune  vif. 

Reinitialises  a  I'aide  des  touches  [CONTROL]  [SHIFT]  [ESC]. 

Le  tableau  2  vous  montre  qu'en  mode  0.  deux  des  numeros  de  PEN  (numeros  1 4  et  1 5) 
ou  de  PAPER  (numeros  14 et  1 5)  rcpresentent  les couleurs clignotantes d'onginc.  Autrc- 
ment  dit,  leurs  commandes  INK  ont  etc  preprogrammees  avec  un  parametre  de  couleur 
supplemental. 

On  le  constate  en  faisant : 

mode  0  [RETURN] 
pen  15  [RETURN] 

...afin  que  le  mot  Ready  alterne  entre  bleu  ciel  et  rose !  Si  vous  faitcs  ensuite : 

paper  14  [RETURN] 
els  [RETURN] 

...outre  Ready  clignotant  entre  bleu  ciel  et  rose,  le  fond  de  PAPER  alterne  maintenant 
en tre  jaune  et  bleu. 

Les  numeros  de  stylo  et  papier  14  et  15  peuvent  etre  reprogrammes  par  la  commande 
INK.  pour  obtenir  d'autres  couleurs  intermittentes  ou  une  couleur  fixe. 

Enfin,  on  peut  faire  clignoter  la  couleur  du  cadre  en  ajoutant  un  autre  numero  de  couleur 
a  la  commande  BORDER. 

Par  exemple : 

border  6,9   [RETURN! 

La  couleur  du  cadre  alterne  du  rouge  vif  au  vert.  Pour  le  cadre,  vous  avez  le  choix  entre 
une  ou  deux  couleurs  parmi  les  27  disponibles,  quel  que  soit  le  mode  de  lonctionnement 
0,  1  ou  2. 

Reinitialisez  l'ordinateur  a  I'aide  des  touches  [CONTROL]  [SHIFT]  [ESC]. 
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Pour  voir  ce  qu'il  est  possible  de  faire  avec  les  couleurs,  tape2  ce  programme  et  lancez-te 
(run). 


10 
20 
30 
40 
50 
60 

70 

30 

90 

100 

110 

120 

130 

140 

150 

160 

170 

180 

190 

200 

210 

220 

230 

240 


MODE  0  [RETURN] 

vi tesse=600!REM  Determine  la  vitesse  du  programme  [RETURN] 

FOR  b=0  TO  26  [RETURN] 

LOCATE  1,12  [RETURN] 

BORDER  b  [RETURN] 

PRINT"COULEUR  DU  CADRE";b  [RETURN] 

FOR  t=l  TO  vitesse  [RETURN] 

NEXT  t,b  [RETURN] 

CLG  [RETURN]  "■* 

FOR  0=0  TO  15  [RETURN] 

PAPER  p  [RETURN] 

PRINT"PAPIER"ip  [RETURN] 

FOR  n=0  TO  15  [RETURN]  ■  . 

PEN  n  [RETURN] 


PRINT"STYLO";n  [RETURN] 


NEXT  n  [RETURN] 
FOR  t=l  TO  vitesse*2 
NEXT  t,p  [RETURN] 
MODE  1  [RETURN] 
BORDER  1  [RETURN] 
PAPER  0  [RETURN] 
PEN  1  [RETURN] 
INK  0,1  [RETURN] 
INK  1,24  [RETURN] 


[RETURN] 


run    [RETURN] 


IMPORTANT 

Dans  ce  programme,  comme  dans  les  chapitres  suivants  et  les  listages  du  manuel,  les 
mots  cles  du  BASIC  apparaissent  en  majuscules.  I!  s'affichent  ainsi  sur  la  demande 
d'une  instruction  LIST.  II  est  generalement  preferable  dc  taper  les  instructions  et  les 
programmes  en  minuscules  pour  mieux  detecter  les  crrcurs  de  frappe  lors  des  listages 
des  programmes  (les  mots  cles  mal  orthographies  ne  sont  alors  pas  convcrtis  en  majus- 
cules). 

Jusqu'a  la  fin  de  ce  cours  elementaire,  les  programmes  sont  listes  en  majuscules  et  en 
minuscules  afin  de  vous  famiiiariser  avec  ce  procede. 

Un  nom  de  variable,  x  ou  S  par  exemple,  ne  sera  pas  converti  en  majuscule  lors  du 
LISTage  du  programme,  bien  qu'il  soit  reconnu  par  le  programme  de  toute  facon. 


Attention 

A  partir  de  maintenant,  nous  ne  preciserons  plus  de  taper  [RETURN!  a  la  fin  de  chaque 

ligne.  Nous  supposons  que  vous  en  avez  pris  le  reflexe. 
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Graphiques 

II  y  a  un  certain  nombre  de  caracteres  dans  la  memoire  de  l'ordinateur.  Pour  afficher  Tun 
de  ces  caracteres,  on  utilise  lc  mot  reserve  : 

chr«(    ) 
Entre  les  parentheses,  on  entre  le  numero  du  symbole  (entre  32  et  255). 
Faites  [CONTROL],  [SHIFT]  et  [ESC]  pour  la  remise  a  zero,  puis  tapez : 

print  chr*(250> 

N'oubliez  pas  d'appuyer  sur  [RETURN],  Sur  I'ecran  apparait  le  caractere  N°250,  qui 

represente  un  homme  marchant  vers  la  droite. 

Pour  affichcr  tous  les  caracteres  et  symboles  avec  leurs  numeros,  tapez  le  programme  sui- 
vant,  en  n'oubliant  pas  d'appuyer  sur  [RETURN]  apres  chaque  ligne. 

10  FOR  n=32  TO  255 

20  PRINT  n;CHR$(n)) 
30  NEXT  n 

run 

Vous  trouverez  au  chapitre  «  Pour  information... »  tous  les  caracteres  accompagnes  de 
leurs  numeros. 


LOCATE  (place  le  curseur) 

On  se  sert  dc  cette  commande  pour  mettre  le  curseur  a  un  certain  endroit  de  I'ecran.  Sans 
la  commande  LOCATE,  le  curseur  se  trouve  en  haut  et  a  gauche  de  I'ecran,  ce  qui  corres- 
pond en  coordonnees  x,y  a  1 . 1  (x  etant  la  position  horizontal,  y  la  position  verticale).  En 
Mode  1,  il  y  a  40  colon nes  et  25  lignes.  Pour  placer  un  caractere  en  haut  au  milieu  de 
Fecran,  il  faut  indiquer  x  =  20  et  y  =  1 .  Essayons  : 

mode  1  ...Fecran  s'efface ;  le  curseur  se  trouve  en  haut,  a  gauche. 

IB  LOCATE  20,1 

20  PRINT  CHRM250) 

run 
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Pour  verifier  qu'il  s'agit  bien  du  haut  de  Pecran,  tapez : 
border  0 

Le  cadre  sera  noir  et  vous  verrez  Ie  petit  bonhomme  au  milieu  de  la  ligne  superieure. 

En  Mode  0,  il  n'y  a  que  20  colonnes,  mais  toujours  25  lignes.  Si  vous  tapez : 

•ode   0 
run 

...le  bonhomme  apparait  en  haut  a  droite  de  Pecran,  car  la  20eme  colonne  est  la  derniere 
du  mode  0. 

En  mode  2,  il  y  a  80  colonnes  et  25  lignes.  A  Paide  du  meme  programme,  vous  devinez 
certainement  ou  va  apparaitre  le  petit  bonhomme.  Tapez : 

node  2 
run 

Revenez  au  Mode  1,  en  faisant : 
mode   1 

A  vous  maintenanl  de  faire  varier  les  nombres  apres  locate  et  dans  CHR$  ( ).  Pour 

Pexemple,  essayez : 

locate  20,12:print  chr*<240) 

Vous  voyez  une  fleche  au  centre  de  Pecran.  Dans  cette  instruction  :  ■     ; 

20  est  la  coordonnee  horizontale  (comprise  entre  1  et  40) 
12  est  la  coordonnee  verticale  (comprise  entre  I  et  25) 
240  est  ic  numero  du  caractere  (compris  entre  32  et  255) 

Pour  voir  le  caractere  250  repete  sur  I'ecran,  il  sufitt  de  taper : 

10  CLS 

20  FOR  X=l  TO  39 

30  LOCATE  X,20 

50  PRINT  CHR*(250) 

60  NEXT  X 

70  SOTO  10 

run 

Faites  [ESC]  deux  fois  pour  interrompre  le  deroulement. 
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Pour  effacer  le  caractere  precedent  avant  d'afficher  le  suivant,  tapez  : 

58   PRINT    M    ";CHR*(250) 
(La  nouvelie  ligne  50  remplace  automatiquement  la  precedente). 
Maintenant,  tapez : 

run 

FRAME 

Pour  que  le  mouvement  du  caractere  soit  plus  joli,  ajoutez  la  ligne  suivante  : 
40   FRAME 

La  commande  FRAME  synchronise  le  mouvement  de  1'objet  affiche  sur  la  frequence  de 
balayage  de  la  trame  d'affichage.  Si  cette  notion  vous  parait  trop  technique,  rappelez- 
vous  simplement  que  cctte  commande  sert  a  deplacer  harmonieusement  sur  lecran  des 

caracteres  ou  des  graphiques. 

On  peut  encore  ameliorer  ce  programme  en  ajoutant  des  petites  pauses  et  en  utiltsant 

d'autres  caracteres. 

Pour  ce  faire,  tapez  : 
list 

Puis  ajouter  les  lignes  suivantes  au  programme  : 


70  FOR  n*l  TO  300:NEXT  n 

80  FOR  x=39  TO  i  STEP  -1 

90  LOCATE  x,20 

100  FRAME 

110  PRINT  CHR*(25l)5"  " 

120  NEXT  x 

130  FOR  n=l  TO  300:NEXT  n 

140  GOTO  20 

run 
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PLOT  (determine  un  point  sur  I'ccran) 

Contrairement  a  la  commande  LOCATE,  PLOT  sert  a  fixer  la  position  du  curseur 

graphique.  utilisant  les  coordonnees  des  pixels  (un  pixel  est  la  plus  petite  unite  de  Fecran). 

Remarque  :  le  curseur  graphique.  different  du  curseur  des  caracteres,  n'est  pas  visible. 

II  y  a  640  pixels  horizontaux  sur  400  verticaux.  Les  coordonnees  x  et  y  sont  definies  par 
rapport  au  coin  inferieur  gauche  de  I'ecran,  qui  a  pour  coordonnees  0,0.  Contrairement 
a  la  commande  LOCATE,  appliquee  aux  caracteres,  ccs  coordonnees  sont  les  memes  en 
Mode  0,  !  ou  2. 

L'ordinateur  ayant  ete  remis  a  zero  a  1'aide  de  [CONTROL]  [SHIFT]  et  [ESC],  essayez  : 

plot   328,208 

Un  petit  point  apparait  au  centre  de  Fecran. 

Changeons  de  Mode  en  tapant :  . 

mode  0 

plot  320,200 

Le  point  se  trouve  toujours  au  milieu  de  Fecran,  mais  agrandi.  Changez  a  nouveau  de 
mode  et  tapez  la  memc  commande  pour  voir  le  resultat  en  mode  2  : 

mode  2 

plot  320,200 

Le  point  est  toujours  au  centre,  mais  beaucoup  plus  petit. 

Essayez  de  dessiner  des  points  sur  Fecran  avec  les  differents  modes  pour  vous  habituer  a 
la  commande  PLOT.  Revenez  ensuile  en  Mode  1  et  videz  Fecran  en  tapant : 

node   1 


DRAW  (Dessine  une  ligne) 

Remise  a  zero  :  [CONTROL]  [SHIFT]  et  [ESC].  La  commande  DRAW  dessine  une  ligne  a 
partir  de  la  position  du  curseur  graphique.  Pour  mieux  comprendre,  dessinons  un  rectan- 
gle sur  Fecran  avec  le  programme  suivant. 

On  commence  par  placer  le  curseur  graphique  avec  la  commande  PLOT.  Puis  on  dessine 
une  ligne  a  partir  de  ce  point,  vers  le  coin  superieur  gauche,  puis  vers  la  droite,  etc... 
Tapez : 
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5  CLS 

10  PLOT  10,10 

20  DRAW  10,390 

30  DRAW  630,390 

40  DRAW  630,  10 

50  DRAW  10,10 

60  GOTO  60 
run 

Actionnez  [ESC]  deux  fois  pour  sortir  du  programme. 

(Dans  ce  programme,  I'ordinatcur  boucle  indefiniment  a  la  Kgne  60  jusqu'a  ce  que  vous 
1'interrompiez  en  appuyant  deux  fois  sur  la  touche  [ESC].  Cc  type  ^instruction  evite 
1'interruption  automatiquc  du  programme  apres  la  dernicre  ligne  et  1  affichage  du  mes- 
sage Ready). 

Ajoutez  maintenant  les  lignes  suivantes  pour  dessiner  un  deuxieme  rectangle  a  I'interieur 
du  premier : 

60  PLOT  20,28 
70  DRAW  20,380 
80  DRAW  620,380 
90  DRAW  620,20 
100  DRAW  20,20 
110  GOTO  110 
run 

Appuyez  sur  deux  fois  [ESC]  pour  sortir  du  programme. 

MOVE 

La  commande  MOVE  fonctionne  comme  PLOT,  c'est-a-dire  que  le  curseur  graphique 
se  place  sur  le  point  des  coordonnees  x,y  sans  tracer  le  pixel  au  nouvel  emplacement  du 

curseur. 

Tapez : 

el* 

■ove   639,399 

Bien  que  nous  ne  le  voyons  pas  a  I'ecran,  le  curseur  graphique  se  trouve  maintenant  dans 
Tangle  superieur  droit. 

Mettons  cette  position  en  evidence  en  tracant  une  ligne  a  partir  de  ce  point  vers  le  centre 
de  I'ecran.  Tapez : 

draw   320,200 
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Cercles 

On  peut  dessiner  des  cercies  a  1'aide  des  commandes  PLOT  ou  DRAW.  Pour  dessiner  un 
cercle.  vous  pouvez  placer  les  coordonnees  x  et  y  de  chaque  point  de  sa  circonference.  Sur 
la  figure  suivante.  un  point  «  p  »  peut  etre  place  avec  la  commande  PLOT,  en  utilisant  les 

coordonnees  x  et  y. 

x=190*cos<a> 
y=190*sin<a) 


M 


Positionnement  du  centre  d'un  cercle 

Dans  les  programmes  precedents,  on  avait  fixe  le  centre  par  rapport  au  coin  inferieur 
gauche  de  1'ecran.  Pour  tracer  un  cercle  au  milieu  de  l'ecran,  il  faut  placer  son  centre  aux 
coordonnees  320  et  200,  puis  dessiner  tous  les  points  du  cercle  par  rapport  a  ce  centre  en 
ajoutant  ies  coordonnees  de  ce  dernier.  Voici  un  programme  pour  obtenir  un  cercle  ; 


new 

10 

23 

33 

40 

50 

60 

run 


CIS 
DEG 
FOR  a=l  TQ  340 

MOVE   320,200 

DRAW   320  +  190ICOSUI 

NEXT 


,200+190*SIN(a) 


A 

4 
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Le  mot  cle  NEW  precedant  l'entree  du  programme  remet  la  memoire  a  zero  (comme  une 
reinitialisation),  sans  toutefois  effacer  1'ecran. 

Le  rayon  du  cercle  peut  etre  reduit  en  diminuant  le  nombre  190  (nombre  de  pixels). 

Pour  obtenir  un  cercle  determine  d'une  maniere  differente  (en  radians),  enlevez  la  ligne 
20  en  tapant : 

20 

Pour  dessiner  un  cercle  plein  (un  disque)  avec  des  lignes  tracees  a  partir  du  centre,  modi- 
He*  (EDIT)  la  ligne  50  en  remplacant  le  mot  PLOT  par  le  mot  DRAW.  Elle  devient : 

50    DRAW   320M?0tCQSU),200+190»SINU> 

Essayez  maintenant  avec  et  sans  la  ligne  20. 

Notez  que  dans  la  ligne  60  de  ce  programme,  NEXT  n'est  pas  suivi  de  a.  On  peut  mettrc 
seulement  NEXT  :  1'ordinatcur  determine  alors  a  quel  FOR  il  se  rapporte.  Dans  les  pro- 
grammes contenant  de  nombreux  FOR  ct  NEXT,  il  est  toutefois  preferable  d'ajouter  la 
variable  apres  NEXT  afin  dc  mieux  s'y  retrouver. 


ORIGIN 

Dans  le  programme  precedent,  on  s'est  servi  de  la  commande  MOVE  pour  fixer  le  centre 
du  cercle,  puis  on  a  ajoute  les  coordonnees  x,y  a  cellcs  du  centre.  Au  lieu  de  cela,  nous 
pouvons  utiliser  la  commande  ORIGIN  (attention,  pas  de  E  a  ORIGIN,  e'est  un  mot 
reserve).  Ella  place  les  coordonnees  x  et  y  de  chaque  point  en  fonclion  d'ORIGIN.  Veri- 
fions  ccci  avec  le  programme  : 

new 

10  CLS 

20  FOR  a=l  TO  360 

30  ORIGIN  320,200 

40  PLOT  190*COS(a) ,  190»SIN<a) 

50  NEXT 

run 
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Pour  obtenir  quatre  petits  cercles  sur  l'ecran,  entrons  lc  programme  suivant 


new 

10    CLS 

20  FOR  a  =  l  TO  360 
30  ORIGIN  196,282 
40  PLOT  50*COS(a),50*SIN(a) 

50  ORIGIN  442,282 

60  PLOT  50*COSU),50*SIN(a> 

70  ORIGIN  196, Hi 

80  PLOT  50tCQSU},50*SIN(»> 

90  ORIGIN  442,  116 

100  PLOT  50*COSU),50*SINU>       ,- 

110  NEXT 
run 

Pour  experimenter  une  autre  methode  de  creation  d'un  cercle,  tapez  Ie  programme  : 

new 

10  MODE  1 

20  ORIGIN  320,200 

30  DEG 

40  MOVE  0,190 

50  FOR  a=0  TO  360  STEP  10 

60  DRAW  190*SIN<a),190*COS(a) 

70  NEXT 

run 

Cette  fois,  une  ligne  est  tracee  (DRAW)  de  coordonnee  en  coordonnee  sur  Pensemble  de 
la  circonference.  Le  tracage  est  nettement  plus  rapide  que  Ie  positionnement  des  points. 

Une  fois  encore,  observe?  la  consequence  du  retrait  de  la  commande  DEG  par  suppres- 
sion de  la  ligne  30  et  relancez  le  programme. 

FILL 

La  commande  FILL  sert  a  remplir  une  zone  d'ecran  delimitee  par  une  courbe,  le  bord  de 
l'ecran,  ou  d'une  fenetre  graphique. 

Reinitialisez  a  l'aide  des  touches  [CONTROL]  [SHIFT]  et  [ESC],  puis  tapez : 

new 

10  CLS 

20  MOVE  20,20 

30  DRAW  620,20 

40  DRAW  310,380 

50  DRAW  20,20 

run 
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Un  iriangle  apparait  a  Pecran.  Placez  le  curseur  graphique  au  centre  de  Pecran  en  tapant : 
•ove  320,200 

A  Paide  du  mot  cle  FILL  suivi  d'un  numero  de  stylo  {3  par  exemple),  remplissez  I'ecran  a 
partir  de  la  position  du  curseur  graphique  (centre  de  I'ecran)  jusqu'aux  limites  tracees. 
Tape? : 

fill    3 

Amenez  maintenant  le  curseur  graphique  a  Pexterieur  du  triangle : 
•ove   0,0 

Observez  ce  qui  se  passe  si  vous  tapez :  .- 

fill    2 

A  Paide  du  stylo  numero  2,  Pordinateur  a  rempli  la  zone  comprise  entre  les  lignes  tracees 
et  les  bords  de  Pecran. 

Modifier  le  programme  et  regardez  ce  qui  se  passe  : 

50  DRAW  50,50 
60  MOVE  320,200 
70  FILL  3 
run 

Toute  interruption  de  lignes  sur  Pecran  laisse  «  passer  »  la  couleur  du  stylo. 

Ce  phenomene  est  illustre  par  le  remplissage  d'un  cercle  positionne  a  Pecran,  puis  d'un 
cercle  trace.  Tapez : 


new 
10  CLS 

20  FOR  a=i  TO  360 

30  ORIGIN  320,200 

40  PLOT  l90tCOS(a),  190ISINU) 

50  NEXT 

60  MOVE  -188,0 

70  FILL  3 

run 
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Tapez  maintenant : 

new 

10  MODE  1 

20  ORIGIN  320,200 

30  DEG 

40  MOVE  0,190 

50  FOR  d  =  0  TO  360  STEP  10 

60  DRAW  190*COS(d),190ISlN(d) 

70  NEXT 

80  MOVE  -188.0 

90  FILL  3 

run 


;  /"- 


Vous  pouvez  rendre  la  circonference  du  cercle  invisible  en  utilisant  la  meme  couleur  pour 
le  stylo  et  le  papier.  Ajoutez  cette  ligne  : 

45   GRAPHICS   PEN   2: INK   2,1 
run 

La  commande  GRAPHICS  PEN  selectionne  le  stylo  pour  le  tracage  des  graphiques.  La 
commande  INK  specifie  la  couleur  d'encre  de  ce  stylo  qui,  en  l'occurrence,  est  la  meme 
que  celle  du  papier  (ici,  numero  de  couleur  1). 


Pour  terminer,  tapez  ce  programme  de  demonstration  : 

10  MODE  0: BORDER  13 

20  MOVE  0,200:DRAW  640,200 

30  FOR  x=80  TO  560  STEP  80 

40  MOVE  x,0:DRAW  x,400 

50  NEXTsMOVE  -40,300 

60  FOR  c=0  TO  7 

70  MOVER  80,0:FILL  c 

80  MOVER  0,-200sFILL  c+8 

90  MOVER  0,200:NEXT 

100  GOTO  100 

run 


Les  couleurs  des  zones  en  plein  peuvent  etre  modifiees  apres  leur  remplissage.  Tapez  : 

100  SPEED  INK  30,30 

110  BORDER  RNDI26 

120    INK    RN0U5,RNDI26,RND*26 

130  FOR  t=t  TO  500: NEXT: GOTO  110 

run 
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Conpienents  d'information... 

Consultcz  la  partie  «  Graphiques  »  du  chapitre  «  A  vos  heures  de  loistr... »  pour  un  guide 
complet  des  possibiiites  graphiques  du  CPC664. 

Pour  terminer  ce  chapitre,  voiei  quelques  programmes  de  demonstration  graphique  inte- 
grant des  commandes  et  des  methodes  desormais  a  votre  portee.  Chacun  de  ces  program- 
mes trace  des  motifs  en  continu. 


new 

10  BORDER  0;GRAPHICS  PEN  t 

20  m=CINT  (RND*2)sM0DE  m 

30  il=RND«26ii2=RND*26 

40    IF    ABS(il~i2)<i0    THEN    30 

50    INK    B,il:  INK    1 , i  2 

60    s=RND*5+3;QRIGIN    320,-100 

70    FOR    x=-1000    TO    0    STEP    s 

60   MOVE    0,0;DRAW   x,300:DRA»l   0,688 

90    MOVE    0,0:DRAW    -x,300:DRAW    0,680 

180   NEXTrFOR  t-\    TO  2000:NEn    :G0TO  28 

run 

10    rlODfe    1 1  BORDER    0IHAP6R    1 

20  GRAPHICS  PEN  2: INK  0,0 

30  EVERY  2200  GOSUB  150 

40  FLAG=0:CLG 

50    INK   2.-14+RNDH2 

60    B'/,  =  RND*5+1 

70    C7.=RNDt5  +  l 

80  ORIGIN  320,200 

90  FOR  A=0  TO  1000  STEP  PI/30 

100  X"/.=  100*CQS(A) 

110  MOVE  XX,  X"/. 

120  DRAW  288tC0S(A/BX),2B8tSIN(ft/C7.) 

130  IF  FLAGM  THEN  40 

140  NEXT 

1-58    FLAG  =  llRETURN 

run 
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1 


10 

20 
30 
40 
50 
60 
70 
B0 


MODE  1: BORDER  0:DEG 
PR1NT"VEUILLEZ  PATIENTER 
FOR  N=l  TO  3 


INK  0,0:INK 
IF  N=!  THEN 
IF  N=2  THEN 
IF  N=3  THEN 
IF  N=l  THEN 

0,0,400 

90  DIM  CX(5 


1,26: INK 

SA=120 
SA=135 

SA=150 
ORIGIN 


2, 6:  INK  3, IS 


0,-30,0,640,0,100  ELSE  ORIGIN  0,0,0,64 


CY(5),R(5),LC(5) 


100 

110 

120 

130 

140 

150 

160 

170 

180 

190 

200 

210 

220 

230 

240 

250 

260 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 

410 

420 

430 

440 

450 

460 

470 

480 

490 

500 


5,81) 
1J=200:R(U=80 


CJ=RESTE(2) 
l,2:ST=l 


DIM  NP(51 

DIM  PXX(5,81),PYX 

ST=1:CX(1)=320:CY 

FOR  ST=1  TO  4 

R(ST+l)=R(ST)/2 

NEXT  ST 

FOR  ST=t  TO  5 

LC(ST)=0:NP(ST)=0 

NP(ST)=NP(ST)+1 

PXX(ST,NP(ST))»R(ST)tSIM(LC(ST)) 

PY7.(ST,NP(ST))=R(ST)*C0S(LC(ST)! 

LC(ST)=LC(ST)+360/R(ST) 

IF  LC(ST)<360  THEN  180 

PX7.(ST,NP(ST)  +  l)=PXX(ST,l> 

PY7.<ST,NP(ST)+1)=PY7.  (ST,  I) 

NEXT  ST 

CLS:CJ=RESTE(i): 

CJ=RESTE(3) j INK 

GOSUB  350 

LOCATE  1,1 

EVERY  25,1  GOSUB  510 

EVERY  15,2  GOSUB  550 

EVERY  5,3  GOSUB  590  ■■  -  ,     .    '  ■■ 

ERASE  CX,CY,R,LC,NP,PXX,PYX!NEXT 

GOTO  340 

CX,/.=CX(ST!:CY7.  =  CY(ST):LC(ST)'=0 

FOR  X V.  =  1  TO  NP(ST) 

MOVE  CX7,,CYX 

DRAW  CXX+PXX<ST,XX)tCYX+PYX(ST,XX),l+<ST  MOD 

DRAW  CX7.+PX7.(ST,X7.+  n,CY7.+PY7.(ST,xy.+t!>l+,(ST 

NEXT  XX 

IF  ST=5  THEN  RETURN 

LC(ST)=0 

CX(ST+lt=CX(ST)  +  l'.  5IR(ST)*SIN(SA+LC(ST)  ) 

CY(ST+1)=CY(ST)+1.5*R(ST)*CQS<SA+LC(ST>) 

ST=ST+1 

GOSUB  350 

ST=ST-1 

LC(ST)=lC(ST)+2tSA 

IF  (LC(ST)  MOD  3601O0  THEN  430 

RETURN 


4 

4 


3) 
MOD 


3) 
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510  1K(1)=1+RND*25 

520  IF  IKU)"IK<2)  OR  IK(1)«IK(3>  THEN  510 

530  INK  1,IK(1> 

540  RETURN 

550  IK(2)=1+RND»25 

560  IF  IK(2)=IK(1)  OR  IK(2)"IK(3>  THEN  550 

570  INK  2, IK(2) 

580  RETURN 

590  IK(3)  =  l+-RND*25 

600  IF  IK (3)=IK ( 1>  OR  EK(3)>IK<2)  THEN  590 

610  INK  3, IK(3) 

620  RETURN 
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Partie  9  :  Utilisation  des  sons 


Les  effets  sonores  sont  produits  par  un  haut-parleur  integre  a  1'ordinateur.  Si  vous  utilisez 
l'adaptateur  Peritel  et  un  poste  TV,  baissez  le  volume  au  minimum. 

Le  niveau  sonore  est  regie  par  le  bouton  VOLUME,  place  sur  le  cote  droit  de  1'ordina- 
teur. Le  son  peut  aussi  passer  de  la  prise  STEREO  de  1'ordinateur  a  Tentree  auxiliaire  de 
votre  chame  hi-fi.  Vous  pouvez  ainsi  ccouter  vos  programmes  sonores  en  stereo  sur  vos 
haut-parleurs  ou  votre  casque  d'ecoute.  Consultez  la  partie  2  du  Cours  Elementaire  pour 
connecter  le  casque  a  la  prise  stereo  de  i'ordinateur. 


La  commande  SOUND 

La  commande  du  son,  SOUND,  comporte  sept  parametres.  Si  les  deux  premiers  doivent 
etre  precises,  les  autres  sont  facultatifs.  La  commande  est  ecrite  de  la  maniere  suivante  : 

SOUND  <etat  decanal  >,  <periode  sonore  >,  <duree>,  <volume>, 
<enveloppe  de  volume>,  <enveloppe  de  ton>,  <bruitage>. 

D'apparence  complexe,  ces  parametres  sont  en  fait  faciles  a  identifier.  Nous  allons  les 
etudier  un  par  un. 


Etat  de  canal 

Pour  plus  de  simplicity,  nous  allons  provisoirement  1'assimiler  au  canal  sonore  lui-meme, 
II  existe  trois  canaux  sonores  et  nous  nous  occuperons  pour  1'instant  de  1'  <  etat  de  canal  > 
mimero  1. 


Periode  sonore 

La  <  periode  sonore >  concerne  la  definition  technique  de  la  hauteur  de  note :  do,  re,  mi, 
fa,  sol,  la,  si.  Chaque  note  est  associee  a  un  nombre  representant  sa  <periode  sonore>. 
En  vous  reportant  au  chapitre  «  Pour  information...  »,  vous  verrez  que  la  note  do  corres- 
pond a  une  periode  de  239. 
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Reinitialisez  1'ordinateur  [CONTROL]  [SHIFT]  et  [ESC]  puis  tapez  : 

18    SOUND    i , 239 
run 

Vous  entendrez  un  do  pendant  0,2  seconde. 

Si  vous  ne  percevez  aucun  son,  assurez-vous  que  le  volume  de  votre  ordinateur  n'est  pas 
sur  zero.  Tapez  RUN  une  nouvelle  fois. 


Duree 

Ce  parametre  determine  la  duree  du  son  et  s'exprime  en  centiemes  de  seconde.  En 
I'absence  de  specification,  i'ordinateur  fixe  un  chiffre  de  20,  soit  0,01  x  20,  ce  qui  donne 
bien  une  duree  de  0,2  seconde. 

Pour  faire  durer  la  note  une  seconde,  il  faudra  done  lui  attribuer  un  parametre  de  1 00  ; 
pour  2  secondes,  200.  Tapez : 

10   SOUND    1,239,200 
run 


La  meme  note  do  dure  2  secondes. 


Volume 


>3*vt:i;;-.v 


Ce  parametre  determine  le  volume  de  depart  d'une  note.  Ce  nombrc  varie  dc  0  a  15.  0 

correspond  au  volume  minimum  et  15  au  volume  maximum.  En  I'absence  de  specifica- 
tion, I'ordinateur  fixe  un  chiffre  dc  12.  Tapez  : 


10    SOUND    1,239,200,5 
run 


Remarquez  le  volume  du  son,  puis  tapez  un  numero  de  volume  superieur : 


10    SOUND    1,239,200,15 
run 


Vous  devez  obtenir  un  son  plus  fort. 
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Enveloppe  de  volume 

Pour  faire  varier  le  volume  d'un  son  pendant  son  emission,  vous  pouvez  specifier  une 
enveloppe  de  volume  a  I'aide  de  la  commande  ENV.  Vous  avez  la  possibility  de  fixer  plu- 

sieurs  <enveloppes  de  volumo  differentes,  chacune  ayant  son  propre  numero  de  refe- 
rence, tout  comme  la  commande  SOUND, 

Si  vous  avez  cree  une  enveloppe  de  reference  N°  1  et  que  vous  desiriez  l'utiliser  dans  une 
commande  SOUND,  tapez  1  a  Pendroit  requis  pour  le  parametre  de  Penveloppe.  Nous 
expliquerons  bientot  la  creation  d'une  enveloppe  de  volume. 


Enveloppe  de  tonalite 

Vous  pouvez  utiliser  la  commande  ENT  pour  faire  varier  le  ton  d'une  note  pendant  son 
emission.  Vous  avez  la  possibility  de  fixer  plusieurs  enveloppes  de  tonalite  qui,  comme  la 
commande  SOUND,  ont  chacune  un  numero  de  reference.  Si  vous  creez  une  enveloppe 
de  tonalite  de  1  et  que  vous  faites  appel  a  la  commande  SOUND,  tapez  1  a  Pendroit 
requis  pour  le  parametre  de  P<enveIoppe  de  tonatito.  Nous  expliquerons  bientot  la 
creation  d'une  enveloppe  de  tonalite. 


Bruitage 

C'est  le  dernier  parametre  de  la  commande  SOUND.  II  peut  varier  de  1  a  31 .  Ajoutez  le 

parametre  2  a  la  fin  de  la  commande  SO  UN  D  et  ecoutez  1'effet  obtenu.  Faites-le  passer 
a  27  et  constatez  la  difference.  Tapez  : 

IB   SOUND    1,237,200, 15, ,,2 

Remarquez  que  les  deux  parametres  precedant  le  parametre  de  <  bruitage >  (,„)  ont  ete 
omis.  lis  indiquent  ainsi  Pabsence  d' <  enveloppes  de  volumo  et  de  <tonalite>. 


Creation  d'une  enveloppe  de  volume 

Elle  s'obtient  par  !a  commande  ENV.  Sous  sa  forme  de  base,  cette  commande  possede  4 
parametres.  Ellc  sc  presente  ainsi : 

ENV  < numero  d'enveloppe > ,  <nombredepas>,  < amplitude  de  pas >,  <duree 

du  pas> 

Comme  precedemment,  nous  allons  etudier  ces  parametres  un  par  un. 
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Numero  d'enveloppe 

Cesi  un  numero  de  reference  (entre  0  et  15)  appelable  par  la  commande  SOUND. 

Nombre  de  pas 

Ce  parametre  specifie  le  nombre  de  pas  devolution  du  volume  sonore  entre  le  debut  du 
son  et  sa  fin.  Par  exemple,  pour  une  note  de  10  secondes,  vous  pouvez  obtenir  10  pas 
d'une  seconde  chacun.  Dans  ce  cas-la,  le  parametre  du  < nombre  de  pas>  sera  egal  a  1 0. 

11  peut  varier  de  0  a  1 27. 

Amplitude  du  pas 

Chaquc  pas  peut  faire  varier  le  volume  de  0  a  1 5  par  rapport  au  pas  precedent  Les  16 
volumes  difTerents  sont  les  memes  que  ccux  dc  1a  commande  SOUND.  Cependant,  le 
parametre  d'< amplitude  du  pas>  peut  varier  de  -1 28  a  + 127,  car  le  volume  rcv.ent  a 
0  apres  avoir  depasse  15  (1 6,  32,  48,  64,  80,  96,  etc.). 

Duree  du  pas 

Ce  parametre  specifie  la  duree  de  chaque  pas  par  increment  de  0,01  seconde.  II  varie  de 
0  a  255.  soit  une  duree  maximale  de  2.56  secondes  (0  est  considere  comme  256). 

Notez  que  le  < nombre  de  pas>  multiplie  par  la  < duree  du  pas>  ne  doit  pas  depasser  le 
parametre  de  < duree >  de  la  commande  SOUND,  car  le  son  cesserait  avant  que  le  der- 
nier pas  n'ait  ete  atteint  (entrainant  la  perte  du  restc  de  1  enveloppe  de  volume). 

De  meme,  si  le  parametre  de  < duree >  de  la  commande  SOUND  depasse  lc  < nombre 
de  pas>  multiplie  par  la  < duree  du  pas> ,  le  son  se  poursuit  apres  avoir  atteint  le  dernier 

pas  et  garde  le  volume  final. 

Pour  tester  Tenveloppe  de  volume,  tapez  le  programme : 

10  ENV  1,10,1,100 

20  SOUND  1,142,1000,1,1 
run 
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La  ligne  20  specific  un  son  d'une  periode  dc  284  (LA  international),  durant  10  secondes 
avec  un  volume  de  depart  de  1.  utilisant  I'cnveloppe  de  volume  numero  1  constitute  de 
10  pas,  eievant  chaque  pas  d'une  unite  de  volume  et  durant  une  seconde  (1 00  x  0,01 
sec). 

Change?  la  ligne  10  de  la  maniere  suivante  et  faites  run  chaque  fois  pour  entendre  la 
difference : 

10  env  I, 100, 1,10 

10  env  1,100,2,10 

10  env  1,100,4,10 

10  env  1,50,20,23 

10  env  1,50,2,20 

10  env  1,50, 15,30 

Essay ez  finalement : 

18  ENV  1,38,2,18 

Vous  pouvez  constater  que  le  niveau  de  son  reste  constant  a  mi-chemin.  En  effet,  le  nom- 
bre  de  pas  (50)  et  I'ecart  entre  les  pas  (0,1  seconde)  donnenl  une  variation  du  son  de  5 
secondes  seulement,  alors  que  la  <duree>  du  son  dans  la  commande  SOUND  (la  ligne 
20)  est  de  1 000,  soit  10  secondes. 

Experimentez  les  types  de  sons  que  vous  pouvez  creer. 

Si  vous  le  destrez.  vous  pouvez  creer  des  enveloppes  de  volume  plus  complexes.  Les  3 
parametres  <nombre  de  pas>,  < amplitude  du  pas>  et  <duree  du  pas>  peuvent  etre 
repris  jusqu'a  quatre  fois  a  la  fin  de  la  commande  ENV,  permettant  de  specifier  des  por- 
tions d'enveloppe  differentes. 


Creation  d'une  enveloppe  de  tonalite 

La  commande  d'enveloppe  de  tonalite  est  ENT,  Sous  sa  forme  de  base,  elle  a  4  parame- 
tres. Elle  sc  presente  sous  la  forme  : 

ENT  <  numero  d'enveloppe >,  <nombredepas>,  <  variation  de  periode  sonore 
affectee  a  chaque  pas>,  <duree  du  pas> 

Regardons  ces  parametres  un  par  un. 


Numero  d'enveloppe 

C'est  lc  numero  d'appel  pour  la  commande  SOUND.  II  peut  prendre  une  valeur  de  0  a 
15. 
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N— fcn  *e  |ms 

Ce  parametre  fixe  le  nombre  de  pas  de  la  tonalite  du  son  entre  son  debut  el  sa  fin.  Si,  par 
exemple.  une  note  dure  10  secondes,  vous  pouvez  oblenir  10  pas  d'une  seconde  chacun. 
Le  parametre  < nombre  de  pas>  est  alors  egal  a  10. 

D  peut  varier  de  0  a  239. 


Variation  de  periode  sonore  affectee  a  chaque  pas 

Chaque  pas  peut  laire  varier  la  hauteur  du  son  de  -1 28  a  + 1 27  par  rapport  au  pas  prece- 
dent. Les  pas  negatifs  augmentent  la  hauteur  de  la  note.  Les  pas  positifs  1'abaissent.  La 
periode  la  plus  courte  correspond  a  0.  Vous  devez  tenir  compte  de  ces  notions  lorsque 
vous  definissez  une  enveloppe  de  tonalite.  Vous  trouvcrez  toutes  les  possibilites  de 
periodes  de  ton  au  chapitre  «  Pour  information...  ». 


Duree  du  pas 

Cc  parametre  specifie  la  duree  de  chaque  pas  par  increment  de  0,01  seconde.  II  varie  de 
0  a  255,  soft  une  duree  maximale  de  2,56  secondes  (0  est  considere  comme  256). 

Le  <  nombre  de  pas>  multiplic  par  la  < duree  du  pas>  ne  doit  pas  depasser  le  parametre 
de  <  duree  >  de  la  commande  SO  UN  D.  car  le  son  cesserait  aJors  avant  que  le  dernier  pas 
n'ait  ete  atteint  (dans  ce  cas,  le  reste  de  I'erveloppe  de  tonalite  est  perdu). 

De  merae,  si  le  parametre  de  <duree>  de  la  commande  SOUND  depasse  le  < nombre 
de  pas>  multiplie  par  la  <  duree  du  pas> ,  le  son  se  poursuit  apres  avoir  atteint  le  dernier 
pas  et  garde  la  tonalite  finale. 

Pour  tester  Penveioppe  de  tonalite,  tapez  le  programme  ci-dessous : 

10  ENT  1,100,2,2 

20  SOUND  1,142, 200,15,, 1 
run 

La  ligne  20  specifie  un  son  ayant  une  periode  de  142  (LA  international),  durant  2 
secondes  avec  un  volume  de  depart  de  15  (max),  depourvu  d'enveloppe  de  volume 
(constatez  l'omission  du  parametre  : .,)  mais  dote  d'une  enveloppe  de  tonalite  N°  1 . 

La  ligne  10  affecte  au  N°  1  une  enveloppe  de  tonalite  constituee  de  100  pas,  augmen- 
tant  la  periode  dc  2  unites  a  chaque  pas  et  ayant  chacun  une  duree  de  0,02  seconde 
(2  x  0.0 1  s). 
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Modifiez  maintenant  la  Iigne  10  selon  les  trois  manieres  indiquees  et  lancez  ie  pro- 
gramme pour  entendre  I'efTet  obtenu, 

10   ent    1,100,-2,2 
10    ent    1,  10,4,20 
10  ent    1,10,-4,20 

Remplacez  la  commande  SOUND  et  1'enveloppe  de  tonalite  en  tapant  : 

10    ENT    1,2,17,70 

20    SOUND    1,71,140,15,,! 

30   60T0    10' 

run 

Appuyez  deux  fois  sur  [ESC]  pour  interrompre  le  programme. 

Vous  pouvez  maintenant  combiner  Penveloppe  de  volume,  I'enveloppe  de  tonalite  et  la 
commande  SOUND  pour  obtenir  des  sons  differents.  Commencez  par  taper  : 

10  ENV  1, 100,1,3 

20  ENT  1,180,5,3 

30  SOUND  1,142,300,1,1,1 

run 

Puis  remplacez  la  Iigne  20  par : 

20  ENT    1,100,-2,2 
run 

Remplacez  maintenant  toutes  les  lignes  par  : 

10   ENV    1,180,2,2 

20    ENT    1,100,-2,2 

30    SOUND    1,142,200,1,1,1 

run 


Si  vous  desirez  creer  des  enveloppes  de  tonalite  plus  complexes,  vous  pouvez  repeter  jus- 
qu'a  quatre  fois  les  trois  parametres  :  <nombre  de  pas>,  <  variation  de  periode  sonore 
affecteeachaquepas>  et  <dureedupas>  a  la  fin  de  la  commande  ENT  afinde  specifier 
des  portions  differentes  pour  une  meme  enveloppe.  Essayez  plusieurs  versions.  Ajoutez  a 
la  commande  SOUND  le  parametre  permettant  d'ajouter  du  bruitage  et  des  portions 
supplementaires  d'enveloppe  de  tonalite  et  de  volume. 

Le  chapitre  «  Liste  complete  des  mots  cles  du  BASIC  AMSTRAD  6128  »  decril  en 
detail  les  comma ndes  de  son.  Si  vous  desirez  decouvrir  les  possibilites  sonores  de  votre 
ordinateur,  reportez-vous  au  paragraphe  «  Sons  et  musique  »  du  chapitre  «  A  vos  heures 
de  Ioisir... ». 
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Partie  10  :  Introduction  a  AMSDOS  et 
CP/ML. 

Qu'est-ce  qu'AMSDOS  ? 

A  la  mise  sous  tension  ou  lors  dune  reinitialisation,  le  systeme  se  place  par  defaut  sous 
AMSDOS,  abreviation  d' AMstrad  Disc  Operating  System  (systeme  d'exploitation  de  dis- 
que  AMSTRAD),  offrant  Ies  commandes  de  traitement  de  fichiers  et  les  fonctions  ; 

LOAD    "nomfich" 

RUN    "nomfich" 

SAVE   "nomfich" 

CHAIN   "nontfich" 

MERGE   "naiBfich" 

CHAIN  MER6E   "namfich" 

OPEN  IN  "nofliHch"  .....  ; 

0PEN0UT  "nomHch" 

CLOBEIN 

CLQSEOUT 

CAT 

EOF 

INPUT  #9 

LINE  INPUT  «9 

LIST  #9 

PRINT  #9 

WRITE  »9 

AMSDOS  fournit  en  outre  plusieurs  commandes  supplemcntaires  de  gestion  de  dis- 
quettes. 

Ces  commandes,  appelees  commandes  externes,  sont  precedees  du  symbole  I  (vous  entrez 
cette  barre  I  en  appuyant  simultanement  sur  les  touches  [SHIFT]  et  @) 

Les  commandes  externes  les  plus  frequentes  sont : 

!i 

lb 

I  tape  (qui  peut  etre  subdivisee  en  |  tape.in  et  en  [  tape.out) 

|  disc  (qui  peut  etre  subdivisee  en  I  disc. in  et  en  |  disc.out) 

Les  commandes  a  et !  b  permcttent  aux  systemes  a  deux  unites  de  disquettes  d'indiquer 
a  1'ordinateur  r unite  vers  laquelle  il  doit  diriger  les  commandes  ulterieures. 


Cours  616mentaire  Chap*re  1    Page  75 


Si  vous  tapez,  par  exemple  : 

It 

load   "nonfich"  » 

...vous  indiquez  a  I'ordinateur  qu'il  doit  charger  en  memoire  le  programme  specifie,  se 
trouvant  sur  une  disquette  plaeee  dans  i'unite  A. 

Si  vous  ne  specifiez  pas  |  a  ou  I  biors  de  la  reinitialisation,  le  systeme  exploite  par  defaut 
I'unite  A.  Si  vous  n'uttlisez  que  I'unite  de  disquette  integree  au  systeme,  elle  est  alors 
consideree  comme  I'unite  A  et  vous  n'avez  done  aucun  besoin  de  specifier  |  a  ou  |  b.  Avec 
un  systeme  a  une  seule  unite,  un  |  b  fait  apparattre  le  message  d'erreur  suivant : 

Drive   6;    disc   missing 
Retry,    Ignore   or    Cancel 

...auquei  vous  devez  repondre  C  (pour  cancel  -  annuler). 


Que  faire  pour  utiliser  une  cassette  ? 

La  commande  i  tape  indique  a  I'ordinateur  qu'il  doit  gerer  le  chargement,  la  sauvegarde, 
etc.,  vers  une  unite  de  cassette  externe  et  non  vers  la  disquette.  Si  I  tape  n'est  pas  entre, 
I'ordinateur,  a  chaque  mise  en  route  ou  reset,  dirige  toutes  les  operations  automati- 
quement  vers  la  disquette.  Pour  revenir  sur  disquette  apres  un  i  tape,  vous  devez  rentrer 
la  commande  :  I  disc.  Par  centre,  vous  pouvez  avoir  besoin  de  charger  un  programme  sur 
cassette  et  de  sauvegarder  des  donnees  sur  disquette.  Faites  alors  appel  a  la  commande  : 

S  tape. in 

Cette  commande  dit  a  I'ordinateur :  tu  dois  lire  sur  la  cassette  et  ecrire  sur  la  disquette. 

Inversement,  pour  lire  le  disque  et  ecrire  sur  la  cassette,  vous  devez  entrer  la  commande 
|  disc.in  pour  annuler  le  |  tape.in  entre  precedemment,  puis  I  tape.out  pour  diriger 
toutes  sorties  de  donnees  vers  la  cassette. 

On  peut  ainsi  avoir  des  |  tape.in  et  des  j  tape.out  qui  vont  annuler  des  |  disc.in  et  des 
I  disc. out,  et  vice- versa. 

Vous  trouverez  des  details  plus  precis  concernant  les  entrees  et  sorties  aux  chapitres  «  Uti- 
lisation des  disquettes  et  des  cassettes*  et  «  Les  elements  de  I'AMSDOS  et  du 
CP/M  »  (chapitres  4  et  5). 
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Duplication  de  programmes  d'une  disquette  a  I'autre  ou  sur  cassette 

La  partie  7  du  Cours  Elementaire  decril  le  formatage  d'une  disquette  vierge  a  1'aide  du 
programme  D1SCK1T  3  sur  la  face  1  de  Tune  des  disquettes  systeme  CP/M  et  la  duplica- 
tion des  programmes  dune  disquette  a  I'autre.  Considerant  les  informations  ci-dessus  les 

commandes : 

Itape  idisc  [tape. in  Itape.out  Idisc. in  idisc.out   '»  »b 

...vous  permeitront  de  charger  et  de  sauvegarder  vos  donnees  sur  cassette  (si  une  unite  de 
cassette  est  connectee  a  I'ordinateur)  ou  disquette,  dans  Punite  A  ou  B, 

Les  commandes  externes : 

Idir  Idrive  Sera  irtn  Suser 

...sont  traitees  dans  le  chapitre  5  «  Les  elements  de  1'AMSDOS  et  du  CP/M  ». 

Duplication/copie  integrale  d'une  disquette 

Vous  pouvcz,  a  1'aidc  du  programme  DISCKIT3  (face  1  d'une  des  disquettes  systeme 
CP/M).  copier  integralcmcnt  une  disquette  sur  une  autre. 

Cettc  methode  vous  servira,  cntre  autres,  a  faire  des  copies  de  sauvegarde  de  vos  disquet- 
tes systeme. 

Inserez  Tune  des  disquettes  systeme  dans  1'unite,  face  I  vers  le  haut,  et  tapez : 

lepra 

A  la  suite  du  message  A  > ,  tapez : 
di5ckit3 

Au  bout  de  quelques  secondes,  le  message  initial  du  DISC  KIT  apparait  en  haut  de 
l'ecran.  suivi  de : 

Qrte   drive    found 


Ce  message  indique  que  vous  etes  sous  1'utilitaire  DISC  KIT  el  que  I'ordinateur  a  detecte 
Pexploitation  d'une  seule  unite  de  disquette  (celle  qui  est  integree  a  i'ordinateur). 
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Si  une  unite  supplementaire  est  reliee  au  systeme,  l'affichage  indique  : 
Two  drives  found 

et  ce  menu  apparait  au  bas  de  l'ecran  : 


Copy 

Format 

Verify 

Exit  from  program 


II  s'agit  du  menu  principal  du  DISC  KIT.  Les  numeros  inscrits  dans  les  cases  correspon- 
dent aux  touches  de  fonction  situees  a  droite  du  clavier  (fO,  f1,  f3  et  f7).  Faites  votre 
selection  a  I'aide  de  la  touche  voulue. 

Appuyer  sur  la  touche  de  fonction  fO,  a  ce  stade  des  operations,  vous  fait  sortir  du  pro- 
gramme DISC  KIT  pour  vous  ramener  sous  le  systeme  CP/M  (message  A  > ). 

Puisque  nous  voulons  copier  une  disquette,  appuyez  sur  f7. 

ATTENTION 

LA  COPIE  SUR  UNE  DISQUETTE  DEJA  ENREGISTREE  ENTRAINERA  L'EF- 
FACEMENT  DE  SON  CONTENU. 


Copie  sur  un  systeme  a  une  seule  unite 

Si  vous  utilisez  un  systeme  a  une  seule  unite  (pas  d'unite  supplementaire  raccordee),  vous 
receve*  a  l'ecran  le  message  : 


Copy 


Any  other  key  to  exit  menu 

Vous  devez  alors  retirer  la  disquette  systeme  de  Tunite  et  inserer  la  disquette  a  dupiiquer. 
Pour  dupiiquer  la  disquette  systeme,  il  suffit  de  la  laisser  dans  l* unite. 
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Si  la  disquette  source  (celle  dont  vous  souhaitez  copier  le  contenu)  se  trouve  dans  I'unite. 
tapezY. 

L'ordinateur  examine  le  format  de  la  disquette  et  Faffiche  en  haut  de  I'ecran,  pour  votre 
information. 

Au  bout  d'un  moment,  ce  message  vous  est  adresse  : 

Insert  disc  to  WRITE 
Press  any  key  to  continue 

Vous  devez  alors  retirer  la  disquette  source  de  I'unite,  inserer  la  disquette  cible  (celle  sur 

laquelle  vous  desirez  copier  les  donnees),  puis  appuyer  sur  une  touchc  quelconquc  du  cla- 
vier. 

Les  informations  sur  le  format  de  la  disquette  cible  sont  affichees  en  haut  de  I'ecran, 
meme  s'il  s'agit  d'une  disquette  vierge  non  formatee. 

Si  la  disquette  cible  n'est  pas  correctement  formatee  (voire  pas  formatee  du  tout),  le  for- 
matage  s'effectuera  pendant  la  duplication  et  vous  verrez  apparaitre  le  message : 

Disc  isn't  formatted  <or  fautly) 
Going  to  format  while  copying 
Disc  will  be  system  format 


...  ou  un  message  similaire,  suivant  les  disquettes  cible  et  source. 

Lorsque  Tordinateur  est  pret  pour  la  lecture  de  la  disquette  source,  il  vous  communique 
ce  message : 

Insert  disc  to  READ 
Press  any  key  to  continue 

...  vous  devez  alors  reinsurer  la  disquette  source. 

L'achevement  de  l'operalion  de  copie  apres  repetitions  de  cette  manipulation  des  disquet- 
tes source  el  cible,  est  signale  par  ie  message  : 

Copy  completed 

Remove  disc 

press  any  key  to  continue 

...  suivez  alors  les  instructions  affichees  a  I'ecran,  qui  vous  laissent  le  choix  entre  copier 
une  autre  disquette  (en  tapant  Y)  et  revenir  au  menu  principal  du  DISC  KIT. 
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Protection  en  ecriture 

Vous  ne  pouvez  pas  el'fectuer  de  copie  sur  une  disquette  dont  le  trou  de  protection  en 
ecriture  est  ouvert.  Si  vous  tentez  de  le  faire,  vous  obtenez  ce  message : 

Disc  wr i te-protected 
Insert  disc  to  WRITE 
R-etry  or  C-ancel 

Tapez  alors  C  pour  annuler,  rctirez  la  disquette  et  inserez-en  une  autre  appropriee  a  la 

copie. 

Veillez  a  ne  jamais  fermer  le  trou  de  protection  en  ecriture  des  disquettes  dont  vous  sou- 
haitez  conserver  ie  contenu.  C'est  NOTAMMENT  le  cas  des  disquettes  systeme  CP/M. 

Duplication/copie  dans  un  systeme  a  deux  unites 

Suivez  les  instructions  ci-dessus,  chargez  le  programme  DISCKIT3  situe  sur  la  face  1 
d'une  des  disquettes  systeme  et  selectionnez  I'option  Copy  du  menu  principal  du  DISC 
KIT  au  moyen  de  la  touche  f7. 

Vous  verrez  alors  apparaitre  un  nouveau  menu  : 


Read  from  A: 
Read  from  B: 
Exi  t  menu 


8 

5 

2 

Lors  de  la  duplication  de  disquettes  dans  un  systeme  a  deux  unites,  inserer  et  retirer  les 
disquettes  cible  ct  source  n'est  plus  necessaire.  Le  menu  ci-dessus  vous  permet  de  selec- 
tionner  Punite  dans  laquelle  vous  desirez  inserer  la  disquette  source.  Appuyez  sur  f8  pour 
copier  a  partir  de  la  disquette  de  ('unite  A. 
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Vn  troisieme  menu  apparait  alors  a  I'ecran  : 

Write  to  A: 
Write  to  B : 
Exit  menu 


Ce  menu  vous  permet  de  selectionner  1'unite  dans  iaquelle  se  trouvera  la  disquette  cible. 
Rien  ne  vous  empeche  de  choisir  la  meme  unite  pour  les  disquettes  source  et  cible,  mais 
vous  serez  alors  oblige  d'intervertir  les  disquettes,  negligeant  les  avantages  d'un  systeme 
a  deux  unites. 

Pour  plus  de  rapidite  et  de  commodite,  appuyez  sur  la  touche  f6  pour  effectuer  la  copie 
sur  une  disquette  inseree  dans  1'unite  B. 

II  ne  vous  reste  plus  qu'a  placer  les  disquettes  dans  les  unites  appropriees  et  appuyer  sur 
Y  pour  lancer  la  duplication. 

Cette  fois  encore,  les  informations  sur  le  format  des  deux  disquettes  vont  s'afficher  et  si 
la  disquette  cible  est  mal  formatee  ou  pas  formatee  du  tout,  cette  lacune  sera  comblee  lors 
de  la  copie. 

La  fin  de  la  duplication  est  signalee  par : 

Copy  completed 

Remove  both  discs 

Press  any  key  to  continue 

Vous  devez  alors  retirer  les  DEUX  disquettes  pour  poursuivre.  Vous  pouvez  refaire  une 
duplication  en  tapant  Y,  ou  revenir  au  menu  principal  du  DISC  KIT  a  partir  de  toute 
autre  touche. 

Verification  des  disquettes 

Le  programme  DISCKIT3  vous  offre  egalcmcnl  la  possibility  de  verifier  les  disquettes;- 

Le  systeme  affiche  les  informations  concernant  1c  format  de  la  disquette  et  effectue  la 
lecture  de  tous  les  lichicrs  quelle  contient.  Toute  erreur  detectee  a  l'interieur  d'un  fichier 
est  signalee  a  I'ecran. 

Pour  verifier  une  disquette.  inscrez  I'une  des  disquettes  CP/M,  face  1  vers  le  haut,  et 
tapez : 

i  cp« 
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A  la  suite  du  message  A,  tapez : 

disckit3  -■■■ 

Selectionnez  l'option  Verify  du  menu  principal  du  DISC  KIT  (touche  f1)  et  suivez  les 

instructions  affichees. 

Si  vous  operez  sur  un  systeme  a  deux  unites,  vous  pouvez  verifier  une  disquette  inseree 

dans  les  unites  A  ou  B. 

Une  fois  la  disquette  a  verifier  dans  I'unile.  tapez  Y  pour  lancer  foperation. 

La  fin  de  la  verification  est  signalee  par: 

Verify  completed 

Remove  disc 

press  any  key  to  continue 

Si  vous  operez  sur  un  systeme  a  deux  unites,  vous  devez  retirer  les  DEUX  disquettes 
avant  de  pouvoir  poursuivre.  Effectuez  alors  une  autre  verification  en  tapanl  Y,  ou  reve- 
nez  au  menu  principal  du  DISC  KIT  en  appuyant  sur  loute  autre  touche. 

Utilisation  du  programme  DISC  KIT  sous  CP/M2.2 

Pour  formater,  copier  ou  verifier  des  disquettes  creees  avec  ou  pour  les  systemes  CPC664 
ou  CPC464  +  DDH,  done  sous  CP/M2.2,  vous  disposez  d'un  programme  DISC  KIT, 
situe  sur  la  face  4  d'une  des  disquettes  systeme.  Ce  programme  s'appelle  DISCKIT2  et 
fonctionne  de  la  meme  maniere  que  le  DISCKIT3  deja  decrit. 

Pour  lancer  le  DISCKIT2,  inserez  la  disquette  adequate,  face  4  vers  le  haut,  et  tapez: 
!cpm 

A  I'apparition  du  message  initial  du  CP/M2.2  et  de  A,  tapez: 
di  scki  t2 

II  vous  suffit  ensuite  de  selectionner  les  options  requtses  et  suivre  les  instructions  a  I'ecran 

de  la  meme  facon  qu'avec  le  DISCKIT3. 

Remarque:  Pour  la  duplication,  le  programme  D1SCKIT2  utilise  la  memoire  de  I'ecran. 
Vous  verrez  done  apparaitre  a  fecran.  pendant  cette  procedure,  une  image  aleatoire. 
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Complement  d'information 

Pour  de  plus  amples  informations  sur  ('utilisation  des  programmes  des  disquettes  systeme 
CP  M.  consultez  les  chapitres  4  a  9. 

En  dernier  ressort.  verifiez  que  vous  avez  bien  respecte  les  indications  donnes  au  debut 
du  manuel.  sous  la  rubrique  «  IMPORTANT  »  : 

REMARQUES  RELATIVES  A  ^INSTALLATION  :  5,  6,  7. 
REMARQUES  RELATIVES  AU  FONCTIONNEMENT:  1,  2,  3,  4,  5.  6.  7,  9. 
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Partie  11  :  Introduction  a  "t>: 

BANK  MANAGER 

Utiliser  les  autres  64Ko  de  la  memoire 

Lc  CPC6128  posscdc  une  RAM  (Random  Access  Memory  ou  «  memoire  vive  »)  de 
128Ko,  divisee  en  deux  parties  de  64Ko.  CP/M  Plus  utilise  en  permanence  la  totalite  de 
ces  128Ko,  alors  que  lc  BASIC  n'exploite  que  la  premiere  partie  de  64Ko  disponible.  li 
sera  it  dommagc  de  laisser  a  l'abondon  ces  64Ko  au  cours  d'une  programmation  en 
BASIC.  C'est  pourquoi  un  programme  a  ete  mis  a  disposition  pour  rexploilation  de  cet 
espace  memoire  in  utilise.  Ce  programme  off  re  des  commandes  spcciales  supplementaires 
pour  permcttrc  1'utilisation  de  la  seconde  partie  de  R  AM ,  soit  pour  le  stockage  des  images 
d'ecran,  soit  pour  la  memorisation  de  chaines. 

Ce  programme  fournissant  des  commandes  supplementaires  s'intitule  BANK  MANA- 
GER, «  gestionnaire  de  bloc»,  le  terme  technique  «  bloc»  designant  une  partie  de  la 

memoire. 

Utiliser  BANK  MANAGER  pour  les  images  d'ecran 

Le  6128  affiche  en  permanence  une  image  a  1'ecran.  II  exploite  pour  ce  faire  16Ko  de 
memoire  pour  stocker  les  informations  concernanl  la  couleur  et  la  brillance  de  chaque 
pixel  de  I'ecran.  Le  6128  gere  six  blocs  de  I6K0,  cequi  signifie  six  images  d'ecran  stockees 
simultanemenl  dans  la  memoire  de  1'ordinateur.  BANK  MANAGER  vous  pcrmet  de 
jongler  et  d'afficher  un  maximum  de  cinq  images  d'ecran  avec  le  BASIC. 

A  la  mise  sous  tension,  le  systeme  d'affichage  exploite  un  bloc  memoire  de  I6K0;  nous 

Pappellerons  «  bloc  I  ».  Les  quatre  autres  ecrans  sont  contenus  dans  la  seconde  partie  de 
64Ko,  dans  les  blocs  2,  3.  4  et  5. 

Seul  le  bloc  1  (contenu  dans  la  premiere  partie  de  la  memoire)  peut  servir  a  Paffichage 
d'un  ecran.  Pour  visual iser  un  bloc  stock e  dans  la  deuxieme  partie  (blocs  2  a  5).  il  faudra 
done  le  placer  dans  le  bloc  1.  BANK  MANAGER  fournit  toutes  les  commandes  neces- 
saires  pour  deplacer  les  ecrans:  SCREEMCOPY,  parcxcmple.  transfere  un  ecran  sur  un 
autre  ecran  en  ecrasant  le  contenu  de  ce  dernier.  iSCREENSWAP,  pour  sa  part,  per- 
mute le  contenu  des  ecrans. 

Tout  commc  AMSDOS  evoque  precedemment,  BANK  MANAGER  dispose  de  «  com- 
mandes externes »  commencant  par  le  symbole  I  (barre  verticale),  que  vous  obtenez  en 
appuyant  simultanement  sur  [SHIFT]  et  (a:,. 
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Utilisation  de  BANK  MANAGER 

Rcinitialisez  I'ordinateur  en  appuyant  sur  les  touches  [CONTROL]  [SHIFT]  et  [ESC], 
inserez  l'une  des  disquettes  systcme,  face  I  vers  le  haut.  puis  tapcz  : 

RUN    "BANKMAN" 

La  procedure  de  chargement  de  ce  programme  est  detaillee  au  chapitre  7,  partie  13, 
concernant  les  extensions  residentes  du  systeme  (RSX).  line  certaine  comprehension  de 
ces  extensions  et  de  la  reservation  d'espacc  memoire  est  recommandee  pour  1'utilisation 
de  ces  sous  programmes.  Quoi  qu'il  en  soil,  pour  les  exemples  qui  suivent,  vous  n'avez 
pas  a  maitriser  la  procedure  de  chargement. 

Tapez : 


MODE    1 

PRINT    "CECI    EST    L'ECRAN   PAR    DEFAUT" 

!SCREENSWAP,i,2 

Le  texte  doit  alors  disparaitre  de  I'ecran.  Vous  cherchez  maintenant  ce  qu'etait  le  contenu 
de  I'ecran  2  (bloc  2  de  la  memoire).  Si  I'ordinateur  vient  d'etre  mis  sous  tension,  vous  avez 
probablement  a  I'ecran  une  image  aleatoire.  Pour  I'effacer,  tapez  : 

MODE    1 

puis : 

PRINT  "CECI  EST  L'ECRAN  2" 
!SCREENSWAP,1,2 

Le  texte  initial  s'affiche  de  nouveau.  Si  vous  repete?.  la  commande 
SCREEN  SWAP.1 ,2,  vous  constaterez  que  les  contenus  des  deux  ecrans  ont  ete  inter- 
vert  is.  Vous  pouvez  ainsi  ech anger  les  contenus  des  cinq  ecrans  disponibies.  mais  n'ou- 
bliez  pas  que  seuls  les  echanges  impliquant  I'ecran  1  seront  visibles  a  I'ecran. 

L'autre  commande  disponiblc  est  !SCR  EENCOPY.  Elle  vous  permet  de  copier  un  ecran 

sur  un  autre  avec  ecrasement  des  anciennes  donnees. 


Tapez: 


MODE    1 

PRINT  "CECI  EST  L'ECRAN  A  COPIER" 

!SCREENC0PY,2,i 
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Le  contenu  de  l'ecran  1  est  copie  sur  l'ecran  2.  Si  vous  inverscz  les  parametres  en  tapant : 
MODE    I 

!SCREENCQPY,1,2 

le  contenu  de  l'ecran  afliche  est  ccrase  par  celui  de  l'ecran  2. 

Le  premier  parametre  est  done  l'ecran  sur  lequel  s'effectue  la  copie,  et  le  second  parame- 
tre,  l'ecran  a  partir  duquel  s'effectue  celle-ci. 

Lorsque  vous  copiez  des  ecrans  et  que  les  MODEs  des  ecrans  sont  differents,  vous  obte- 
nez  un  affichage  disjoint,  de  meme  si  vous  avez  effectue  un  defilement  d'ecran  depuis  la 
derniere  commande  MODE.  Les  commandes  d'ecran  de  BANK  MANAGER  sont  plu- 
tot  destinees  aux  ecrans  graphiques  qu'aux  ecrans  de  texte  car  les  defilements  y  sont 
moins  frequents. 

Utiliser  BANK  MANAGER  pour  le  stockage  de  chaines 

BANK  MANAGER  dispose  de  quatre  commandes  supptementaires  destinees  a  1'utilisa- 
tion  des  64Ko  de  memoire  supplementaire  pour  archivage  de  chaines  alphanumeriques. 

La  plupart  des  programmes  peuvent  se  scinder  en  deux  parties:  d'une  part,  les  instruc- 
tions proprement  dites  et  d'autre  part,  les  donnees  du  programme.  Un  programme  de 
gestion  de  base  de  donnees  comme  un  carnet  d'adresse  en  est  un  bon  exemple.  Un  tel 
programme  utilise  un  tableau  de  chaines  pour  le  stockage  des  noms  et  des  adresses  corrcs- 
pondant  aux  diflerentes  personnes  repertoriees. 

Les  chaines  sont  stockees  dans  la  seconde  partie  de  64Ko,  Tune  apres  I'autre  et  bout  a 
bout.  L'espace  de  stockage  dc  ccs  chaines  pcut  se  diviser  en  compartiments,  appeles  enre- 
gistrements.  La  longueur  fixe  d'un  enregislremeni  est  comprise  cntre  2  ct  255  caracteres 
et  la  longueur  d'une  chaine  en  BASIC  varic  scion  son  contenu.  Les  enrcgistrements  ser- 
vent  a  fournir  des  compartiments  de  taille  standard  propres  au  rangement  des  chaines 
d'information  sous  une  forme  ordonnee.  A  chaquc  stockage  ou  recherche  dc  donnees 
dans  un  enregistrement,  le  systeme  passe  automatiquement  a  I'enregistrement  suivant 
pour  une  nouvelle  operation.  Cet  enregistrement,  appele  «  enregistrement  courant  »,  est 
automatiquement  utilise,  sauf  specification  eontraire. 

Ce  systeme  de  gestion  de  memoire  est  nomme  «  RAMdisc  ».  car  il  fonctionne  comme  un 
disque  a  acccs  aleatoire.  Ici,  le  support  est  remplace  par  la  RAM. 

Lisez  les  descriptions  des  differentes  commandes  pour  comprendre  Ieur  raison  d'etre, 
sinon  leur  fonctionnement.  et  passez  aux  exemples. 

La  premiere  commande  RAMdisc  estiBANKOPEN.  Elle  specifie  le  nombre  de  caracte- 
res contenus  dans  chaque  enregistrement.  Voici  sa  syntaxe  : 

IBANkOPEN, n 

ou  n  est  le  nombre  de  caracteres  de  I'enregistrement,  compris  entre  0  et  255  ;  mais  les 
valeurs  0  et  I  provoquent  des  effets  inattendus. 
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BANKWRITE  stocke  une  chaine  dans  l'enregistrement  en  cours;  1c  pointeur  d'enre- 
gistrement  est  incremente  pour  pointer  sur  l'enregistrement  suivant,  pret  pour  la  pro- 
chaine  operation.  Void  sa  syntaxe : 

16ANKWRITE,9rV.,a* 

ou  " 

I  BANKWRITE,  iir"/.,a$,n 

ou  r%  est  une  variable  entiere  contenant  un  code  de  retour  pour  information  sur  le  derou- 
Iement  de  1'operation.  el  a$  une  variable  alphanumerique  contenant  les  caracteres  a  ecrire 
dans  l'enregistrement.  Dans  le  premier  exempie,  l'enregistrement  est  l'enregistrement  en 
cours.  Dans  le  second,  le  parametre  n.  facultatif,  specifie  l'enregistrement  sur  lequel  s'ef- 
fectuera  1'operation  d'ecriture. 

BANKREAD  lit  l'enregistrement  en  cours  et  renvoie  son  contenu  dans  une  chaine.  Le 
pointeur  d'enregistrement  est  ensuite  incremente  pour  pointer  sur  l'enregistrement  sui- 
vant, pret  pour  la  prochaine  operation.  La  lecture  d'un  enregistrement  le  laisse  inchange: 
il  peut  done  elrc  lu  et  relu  indefiniment.  Voici  sa  syntaxe: 

!  BANKREAD, drX, aS 
ou 

i BANKREAD, 3rX, a*, n 

ou  r%  est  une  variable  entiere  contenant  un  code  de  retour  pour  information  sur  le  derou- 
lement  de  ['operation,  et  aS  une  variable  alphanumerique  dans  laquelle  le  contenu  de  l'en- 
registrement est  transfere.  Dans  le  premier  cxemple,  l'enregistrement  est  l'enregistrement 
en  cours.  Dans  Ic  second,  le  parametre  n.  facultatif,  specifie  l'enregistrement  a  lire. 

La  dcrniere  commande,  IBANKFIND,  recherche  une  chaine  particuliere  dans  I'ensemblc 
des  enrcgistrements.  Si  la  chaine  est  retrouvee.  la  commande  envoic  le  numcro  de  l'enre- 
gistrcment.  Voici  sa  syntaxe: 

iBANKFIND,3rl,at 
ou 

JBANKF IND,3rX,a*,n 
ou 

.     !  BftNKFIN3,ar"i,a*f  n,m 
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ou  r%  est  une  variable  entiere  qui  renvoie  soit  te  numero  de  renregistrement  dans  lequel 
la  chaine  a  ete  trouvee,  soit  un  code  indiquant  que  la  chaine  n'a  pas  ete  trouvee;  a$  est  la 
chaine  a  rechercher.  Le  parametre  facultatif  n  specifie  I'enregistremenl  du  debut  de  la 
recherche;  s'il  n'est  pas  specifie,  la  recherche  demarre  a  renregistrement  en  cours.  Le 
deuxieme  parametre  facultatif,  m,  specifie  1'enregistrement  de  fin  de  recherche  memc  si 
la  chaine  n'est  pas  retrouvee.  En  cas  d'omission  de  m,  la  recherche  se  poursuit.  jusqu'a 
concurrence  des  64Ko  de  memoire.  pouvant  dans  certains  cas  continuer  au-dela  du  der- 
nier enregislremem  ecril. 

Passons  maintenant  a  un  exercice.  Si  vous  avez  deja  lance  le  programme  BANK  MANA- 
GER pour  prendre  connaissance  des  commandes  d'echange  d'ecrans  et  que  vous  n'avez 
pas  reinitialise  1'ordinateur.  ces  commandes  supplementaires  sont  desormais  residentes, 
Dans  le  cas  contraire,  vous  devez  inserer  Tune  des  disquettes  sysleme,  face  1  vers  le  haut, 
et  taper  : 

RUN    "SANKMAN" 
puis : 

!BANKOPEN,20 

La  longueur  de  1'enregistrement  est  ainsi  fixee  a  20  caracteres  et  1'enregistrement  en  cours 
est  O.Tapez  alors  : 

a*="PREMIEftE  ENTREE"+SPftCE*<5) 

La  chaine  a$  comprendra  exactement  20  caracteres. 

Tapez  maintenant : 

rX=0 
afin  d'initialiser  la  variable  r%, 

puis : 

!BANKNRITE,arX,aC 
aS  va  done  s'ecrire  dans  le  premier  enregistrement  (0).  Tapez  ensuite  ; 

d$=SPACE$(20> 
!BANKREAD,8r7.,d*,a 
PRINT  d* 

La  premiere  commande  initialise  d  avec  20  espaces,  suffisants  pour  contenir  1'enregistre- 
ment en  cours  de  lecture.  La  deuxieme  commande  lit  renregistrement  0  et  place  le  resultat 
dans  d$.  La  commande  IBANKWRITE  incremente  le  pointeur  d'enregistrement  d'une 
unite:  il  faut  done  specifier  1'enregistrement  0  pour  la  lecture.  En  effet,  souvenez-vous  que 
la  lecture  commence  par  defaut  a  1'enregistrement  en  cours.  Le  resultat  de  la  lecture  est 
finalement  affiche,  d$  doit  done  contenir  «  PREMIERE  ENTREE  »  et  5  espaces. 
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Tapez  maintenant : 

b$="8EUX"+5PACE* (16) 
ct="TRQI3"+SF'ACE*(15] 
i BANKWRITE, 3rX,b*,l 

i  BANKWRITE,  3r '/.,(:♦ 


Ces  instructions  placent  b$  et  c$  dans  les  cnregistrements  1  et  2.  Le  parametre  facultatif 
de  la  premiere  commande  BANKWRITE  pcrmet  de  placer  b$  dans  I'enregistrement  I. 
L'enregistrement  en  cours  passant  ensuite  a  I'enregistrement  suivant,  il  n'est  done  pas 
necessaire  de  specifier  I'enregistrement  de  destination  de  c$,  qui  sera  place  automati- 

quement  dans  Tenregistrement  2. 

Tapez : 

PRINT   rl 

Le  resultat  de  PRINT  r%  dans  cet  exemple  doit  etre  2.  On  peut  considerer  ce  numero 

comme  le  dernier  enregistrement  sur  lequel  une  operation  a  etc  effectuee  ou  bien  encore 
comme  I'enregistrement  courant  diminue  d'unc  unite.  Dans  noire  exemple,  le  dernier 
enregistrement  d'ecriture  est  2  et  Tcnregistrement  suivant  sera  3. 

L'interet  de  ce  «  code  de  retour  »  est  de  nous  renseigner  sur  le  dcroulement  de  1' operation 
qui  vient  de  s'effectueur.  Lorsque  cclle-ci  a  abouti,  le  code  est  positif  et  correspond  a  un 
numero  d'enregistrcment.  Sinon,  le  code  est  negatif  et  renvoic  a  un  code  d'erreur.  Les 
commandes  |BANKWRITE  et  IBANKREAD  peuvent  engendrer  deux  codes  d  erreur : 

t  -  fin  de  fichier.  indique  que  tous  les  enregistrements  ont  ete  passes  en  revue  ou  que  I'en- 
registrement specific  n'existe  pas ; 

2  -  erreur  lors  d'un  changement  de  bloc,  ce  qui  ne  devrait  jamais  se  produire. 
Passons  a  d'autres  exemples : 

d*=STRING*(2B,"X"» 
iBANKQPEN,20 
'   FOR  n  =  l  to  3r.8ANKWRITE,9r*,d*snext  .  _ 

d$  contiendra  20  x.  |BANKOPEN  reinitialise  le  pointeur  d'enregistrement  a  0,  ce  qui 
provoque  1'ecrasement  des  enregistrements  0,  1  et  2  par  le  contenu  de  d$  lors  de  Texecu- 
tion  de  la  commande  I  BANKWRITE. 

Tapez  maintenant : 

a*=" PREMIER" 

:BANKWRITE,Sr'/.,a*,0 
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Cette  instruction  ecrit  «  PREMIER  » dans  PenregistrementO,  ecrasant  ainsi  quelques  X. 
A  present,  reinitialise?  d$  avec  20  espaces : 

d*=SPACE*(20> 

Tapez: 

!BANKREAD,3rX,d*,a 

Le  resultat  de  !a  lecture  de  l'enregistrement  0  est  place  dans  la  variable  d$. 
Recapitulons : 

Les  trois  enregistrements  contiennent  des  X.  Dans  l'enregistrement  0.  nous  avons  intro- 
duit  le  mot  «  PREMIER  ».  Nous  avons  rempli  d$  d'espaces,  puis  introduit  dans  d$  le 

resultat  de  la  lecture  de  l'enregistrement  0.  Tapez  maintenant : 

PRINT  d* 

Le  resultat  doit  etre«  PREM1ERXXXXXXXXXXXXX  ».  Ceci  illustre  une  particularite 
importante  de  ces  commandes.  Si  la  chaine  placee  dans  un  enregistrement  ne  1c  remplit 
pas  entiercmcnt,  lcs  caracteres  non  ecrases  demeurent  danscet  enregistrement.  II  est  done 
preferable  d'y  introduirc  unc  chaine  d'espaces  (CHR$(32))  avant  d'y  stocker  de  nouvel- 
les  donnees.  Ceci  evite.  lors  de  la  relecture  d'une  chaine,  de  trouver  des  caracteres  qui  ne 
devraient  pas  y  ctrc.  Ccttc  constatation  concerne  egalement  la  chaine  oii  s'inscrit  le  resul- 
tat d'une  lecture  d'enregistrement.  Si  la  chaine  est  plus  longue  que  l'enregistrement,  cer- 
tains caracteres  en  fin  de  chaine  resteront  inchanges,  ce  qui  explique  la  reinitialisation  dc 
d$  (par  remplissage  d'espaces)  avant  qu'y  soit  place  le  resultat  de  la  lecture  de  l'enre- 
gistrement 0. 

II  est  possible  d'ecrire  une  chaine  dans  un  enregistrement  contenant  moins  de  caracteres 
que  celle-ci.  Dans  ce  cas,  les  caracteres  excedants  seront  ignores. 

De  meme,  il  est  possible  de  lire  le  contcnu  d'un  enregistrement  dans  une  chaine  compor- 

tant  moins  de  caracteres  que  celui-ci.  La  encore,  les  caracteres  excedants  (lus  dans  l'enre- 
gistrement) seront  ignores.  Habituellement,  le  BASIC  augmente  automatiquement  la  lon- 
gueur de  la  chaine  pour  qu'elle  accepte  les  caracteres  excedentaires.  Ce  n'est  pas  le  cas 
avec  les  commandes  externes. 

Pour  terminer,  voyons  la  eommande  IBANKFIND.  Elle  permet  de  rechercher  une  chaine 
parmi  un  groupe  d 'enregistrements.  Par  exempie,  si  l'enregistrement  24  commence  par 

«  FRED  »,  cette  eommande  permettra  de  le  trouver  : 

!BAHKFIND,9rX,"FRED" 

Cette  eommande  est  extremement  utile  pour  les  programmes  de  gestion  de  bases  de  don- 
nees, pour  la  recherche  d'un  nom  ou  d'une  adresse. 
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BAN  K  Fl  N D  commence  sa  recherche  a  Penregistrement  courant  et  pousuit  jusqu'a  trou- 
ver  la  chainc  en  question,  ou  la  fin  de  la  seconde  partie  de  64Ko  de  memoire  ou  sont 
stockes  les  enregistrements. 

II  est  possible  de  specifier  Penregistrement  de  depart  de  la  recherche  en  ajoutant  un 
numero  d'enregistremem  a  la  fin  de  la  commande. 

II  est  egalement  possible  d*introduire  un  autre  numero  d'enregistrcment  a  la  suite  du  pre- 
mier pour  indiquer  Penregistrement  de  fin  de  recherche. 

BAN  K FIN D  peut  aussi  servir  a  rctrouver  une chaine  situe  ailteurs qu'au  debut  d'un  enre- 
gistrement.  Pour  ce  faire.  on  placera  devant  Ies  caractcrcs  recherches  des  CHR${0)  qui, 
traitcs  commc  des  jokers  (tel  «  ?  »  dans  Ies  noms  de  fichicrs  sous  CP.M).  pourront  ainsi 
rem  placer  n*importe  quel  caracterc.  Voici  un  cxcmple  : 

a*=STRI!4l3*(U,Bl  +  "FRED" 
!BANKFIND,3rX,a*,0 

Et  voici  retrouve  le  premier  enregistrement  concernant  lc  mot  «  FRED  »  situe  entre  le 
onzieme  et  quator/ieme  caracteres.  Les  dix  premiers  caracteres  pourront  contenir  un 
numero  de  telephone  ou  tout  autre  information,  que  la  commande   BANK  FIND  igno- 

rera. 

Le  numero  de  Penregistrement  ou  se  trouve  la  chaine  sera  place  dans  la  variable  entiere 
r%  servant  de  code  de  retour  (si  «  FRED  »  a  cte  trouve),  sinon.  le  code  de  rctour  sera 
-3. 

Complement  d'information 

Pour  plus  de  details  sur  BANK  MANAGER,  reportez-vous  au  chapitre  8  et  aux  parties 
13  et  14  du  chapitre  7  concernant  les  extensions  residentes  du  systeme  (RSX). 

En  fin,  assure/.- vous  que  vous  avez  bien  respecte  les  avert  isscmems  donnes  au  debut  de  ce 
manuel,  sous  la  rubrique  «  IMPORTANT  »  : 

REMARQUES  RELATIVES  A  LINSTALLATION  :  1,  2.  3.  9. 
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Voici  la  fin  de  la  partic  10  du  Cours  Elementaire  sur  le  CPC664.  Vous  connaissez  desor- 
mais  la  plupart  des  touches  du  clavier,  ies  commandes  BASIC  ies  plus  simples,  le  forma- 
tage  d'une  disquette  vierge  pour  sa  preparation  a  I'emploi  et  Pexecution  des  fonctions  de 
base  sur  disquette  comme  :  LOAD,  SAVE,  CAT,  etc...  ainsi  que  quelques  commandes 
elemcnlaircs  AMSDOS  et  CP/M.  La  partie  suivante  approfondit  certains  aspects  dc  1'in- 
formatiquc  et  du  BASIC  AMSTR  AD.  II  detaille  1'unite  de  disquette  du  systeme,  prescntc 
AMSDOS  et  CP/M  et  vous  initie  au  nouveau  langage  de  Digital  Research  :  Dr.LOGO. 


Bonne  chance...  et  bonne  lecture  ! 
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Chapitre  2 

Passons  aux  choses  serieuses... 


Apres  la  lecture  du  Cours  Elementaire,  vous  savez  mettre  votre  ordinateur 
en  marche,  lui  fairc  repeter  plusieurs  fois  une  memc  operation  en  utilisant 
la  boucle  FOR  NEXT  et  lui  demander  de  verifier  si  (IF)  une  condition  est 
remplic  pour  qu'il  execute  alors  (THEN)  une  instruction. 

Mais  vous  devez  en  avoir  assez  de  voir  votre  nom  s'afficher  sur  tout  l'ecran  et  vous  vou- 
driez  maintenant  commenccr  a  faire  vraiment  de  I'informatique,  utile  ou  amusante.  Vous 
trouverez  dans  le  chapitre  suivant  la  liste  des  mots  cles  du  BASIC  AMSTRAD,  accompa- 
gnes  de  tout  ce  qu'il  faut  savoir  sur  leur  «  syntaxe  »  et  leur  fonction.  Lorsque  vous  la 
possederez  a  fond,  votre  ordinateur  et  vous  nc  connaitrez  d'autres  limites  que  celles  de 
votre  imagination. 

Si  e'est  la  premiere  fois  que  vous  vous  servez  d'un  ordinateur,  vous  ressentirez  peut-etre 
quelque  apprehension  a  1'idee  de  «  faire  dc  la  programmation  ».  Rassurez-vous  :  e'est 
bien  plus  simple  que  vous  ne  I'imaginez  et  certainement  moins  complique  que  les  spe- 
cialistes  ne  voudraicnt  le  fairc  croire  avec  leur  jargon  !  Ditcs-vous  que  BASIC  n'est  pas 
une  nouvelle  langue  a  apprendrc.  mais  plutot  un  derive  de  I'anglais  auquel,  pour  gagner 
du  temps,  on  a  ajoute  quelques  abrcviations.  CLS  n'est  done  pas  une  formule  magique, 
mais  la  forme  abregee  de  CLear  Screen  (Vide  1'Ecran). 

Finie  la  peur  du  BASIC,  vous  serez  bientot  surpris  de  voir  comme  ii  est  agreable,  apres 
quelques  heures  dc  programmation,  de  recolter  les  premiers  fruits  de  ses  efforts.  La  pro- 
grammation est  un  cxercice  passionnant,  surtout  pour  un  debutant  qui  aborde  un  langage 
et  une  machine  pour  la  premiere  fois.  Souvcnez-vous  bien  que,  tant  que  vous  n'ecrivez 
pas  par  inadvertancc  sur  la  disquette  du  systeme  d'exploitation  CP./M.  rien  de  ce  que  vous 
entrez  au  clavier  ne  pcut  endommager  votre  ordinateur.  Aussi,  n'hesitez  pas  a  innover  ! 


Mais  par  ou  commencer  ? 

C'est  souvent  le  debut  d'un  programme  qui  pose  le  plus  de  problemes  au  neophyte.  Evitez 
surtout  de  vous  jeter  sur  le  clavier  avant  d' avoir  reflcchi  a  ce  que  vous  voulez  faire. 

Vous  devez  d'abord  chercher  a  etablir,  d'une  part,  ce  que  le  programme  est  cense  faire  et. 
d'autre  part,  la  maniere  dont  les  resultats  vous  seront  presentes.  e'est-a-dire  ce  qui  appa- 
raitra  a  l'ecran  lors  de  l'execution  du  programme. 

Une  fois  ceci  etabli,  vous  pouvez  entamer  la  redaction  proprement  dite  du  programme, 
en  songeanl  constamment  qu'il  doit  se  dcrouler  sans  a-coups  du  debut  a  la  fin.  avec  un 
minimum  de  sauts  (GOTO)  en  tous  sens.  Un  programme  bien  ecrit  doit  se  lire  aisement : 
songez  au  casse-tcle  qui  vous  attend  lors  de  sa  mise  au  point,  ou  dc  son  «  debogagc  », 

comme  on  dit  en  jargon  informatiquc. 
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Soyez  tranquille,  BASIC  est  un  langagc  extrcmemcnt  tolerant :  il  vous  remettra  souvent 
dans  le  droit  chemin  d'un  simple  message  d'erreur  affiche  a  1'ecran.  Si  une  idee  vous  vient 

apres  coup,  il  nc  fcra  aucune  difficulte  pour  inserer  une  nouvelle  iigne  entre  deux  Iignes 
existantes. 

Ecrivons  un  petit  programme 

Et  maintenant,  au  travail !  Nous  allons  ecrire  un  programme  permettant  d'enregistrer  le 

nom  et  le  numero  de  telephone  de  vos  amis.  Ce  sera  le  programme  «  Repertoire  Telepho- 
nique  ».  Posons-nous  d'abord  les  deux  questions  primordialcs:  «  Que  doit-il  faire  ?  »,  et 
«  Comment  les  resultats  seront-ils  presentcs '.'  » 

Supposons  que  nous  voulions  un  programme  permettant  d'enregistrer  100  noms  et  nume- 
ros  de  telephone.  I!  suffira  d'entrer  au  clavier  le  nom  d'une  personne  donnee  pour  obtenir 
aussitot  son  numero  de  telephone.  Ce  programme  devra  de  plus  etre  capable  d'afficher  la 
liste  de  toutes  les  informations  memorisees,  au  cas  ou  nous  aurions  oublie  sous  quelle 
forme  un  nom  a  ete  enregistre.  Vous  remarquez  que  nous  sommes  deja  en  train  de  penser 
a  la  presentation  des  resultats. 

Tres  bien,  a  vos  claviers  !  Commencons  par  le  titre  : 

18  REM  repertoire  telephonique 

Donner  un  titre  n'est  pas  une  obligation.  II  vous  aidera  pourtant  beaucoup  a  vous  y 
retrouver  lorsque  vous  aurez  accumule  une  quantite  de  programmes. 

Nous  voulons  done  enlrer  (IN  PUT)  une  chaine  de caracteres  (un  nom)  dans  une  variable. 
Cette  variable,  nous  l'appellerons  NOM$.  De  meme,  nous  aurons  une  variable  pour  les 

numeros  de  telephone,  que  nous  appellerons  TEL$. 

Vous  vous  souvenez  que,  dans  les  exemples  de  programmes  du  Cours  Elementaire, 
I'mstruction  INPUT  vous  avait  permis  d'affecter  une  valeur  a  une  variable.  Ainsi,  avec 
les  Iignes : 

20  INPUT  "entrez  le  nofli"?N0«* 

30  INPUT  "entrez  le  numero  de  telephone"}TELf 

run 

...nous  pourrons  entrer  un  nom  (disons  «  Paul »),  puis  un  numero  de  telephone  (par 
exemplc  1  206  66  60). 

Ces  informations  sont  maintenant  stockees  par  le  programme,  mais  nous  n'obtenons 
encore  aucun  resultat  a  Fecran.  II  nous  faut  done  ecrire  une  partie  de  programme  permet- 
tant de  retrouver  et  d'afficher  ces  informations.  Pour  obtenir  la  valeur  actuelle  de  NOM$ 
et  TEL$,  on  aura  recours  aux  instructions  : 

PRINT    NOM* 
...    et, . . 
PRINT   T£L* 
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Mais  attendez !  Nous  avions  bien  dit  qu'avec  notre  programme  nous  voulions  enregistrer 
jusqu'a  100  noms  el  numeros  de  telephone  ?  Nous  n'allons  toul  de  meme  pas  ecrire  100 
instructions  INPUT  avec  un  nom  de  variable  different  pour  chacune,  puis  100  instruc- 
tions PRINT  pour  afiicher  la  liste  a  l'ecran  !!!  Non,  bien  sur  :  1'ordinateur  resout  ce  pro- 
bleme  au  moyen  d'un  instrument  appele  «  tableau  ».  Le  tableau  permet  d'affecter  a  une 
meme  variab'e  la  «  dimension  »  (le  nombre  de  valeurs)  desiree  (100  dans  notre  cas).  Pour 
connaitre  Tune  de  ces  valeurs.  i)  suffit  d'enlrer  le  nom  de  la  variable  suivi  (entre  parenthe- 
ses) du  numero  de  reference  correspondani.  Ce  numcro  s'appellc  un  « indice  »  et  une 
expression  telle  que  NOM$(27)  s'appellc  une  «  variable  indicee  ».  Nous  sommes  done 
en  mesurc,  en  utilisant  une  variable  numerique  x.  de  travailler  sur  I'ensemblc  des  valeurs 
NOM$(x)  de  notre  tableau  :  il  suffit  de  faire  prendre  a  x  des  valeurs  de  1  a  100  dans  une 
bouclc  FOR  NEXT  (FOR  x  =  1  T0 1 00).  Chaque  fois  que  x  est  augmente  de  1, 1'indice 
est  ega lenient  modifie  ct  designe  ['element  suivant  du  tableau,  un  nom  dans  ce  cas. 

Nous  avons  besoin.  pour  les  variables  NOM$  et  TEL$,  de  deux  tableaux  de  dimension 
100.  Avant  d'utiliscr  un  tableau,  il  faut  avoir  declare  sa  DIMension.  Remplacons  done 

nos  lignes  20  et  30  par  ces  declarations. 

20    DIM   NOM* (100) 

38   DIM   TEL* (1801 

Nos  variables  ainsi  definies,  ecrivons  un  programme  permettant  d'introduire  les  noms  et 
numeros  de  telephone  dans  les  tableaux  (nous  verrons  plus  tard  comment  les  retrouver). 
Ajoutons  les  lignes : 

48  FOR  x=l  TO  180 

50  INPUT  "entrez  le  noa'iNQM* (x > 

60  INPUT  "entrez  le  nuaero  de  telephone" jTEtf (x> 

70  NEXT 

run 

Tout  cela  est  fort  bien,  mais  nous  n'avons  pas  Tintention  d'entrer  les  100  noms  en  une 
seule  fois.  Dc  plus,  la  presentation  du  programme  a  l'ecran  laisse  beaucoup  a  desirer.  II 
s'agit  maintenant  d'y  mettre  un  peu  d'ordre.  Pour  commences  nous  allons,  avant  chaque 
nouvelle  entree,  debarrasser  l'ecran  du  tcxte  anterieur  devenu  inutile.  C'cst  I'arTairc  de 
1'instruction  CLS  : 

45   CLS 

Mais  comment  indiquer  a  1'ordinateur  que,  pour  le  moment,  nous  avons  fini  d'introduire 
des  donnees  ?  Bien  sur,  on  peut  toujours  arreter  un  programme  en  frappant  la  touche 
[ESC],  mais  alors  nos  precieux  enregsstrements  seront  effaces  des  que  nous  donnerons  a 
nouveau  1'ordre  RUN  ! 
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Ii  cxiste  une  meilleure  solution  :  a  chaque  enrcgistrement  d'un  nouveau  nom,  demandons 
au  programme  de  verifier  si  quelque  chose  a  cffcctivcment  ete  frappe  au  clavier,  e'est  a 
dire  si  NOMS(x)  n'est  pas  une  chaine  vide,  et  demandons  lui  de  s'interrompre  dans  le 
cas  contraire.  Avez-vous  devine  par  quel  biais  ?  Ecrivons : 

55    If-  NQflStx )=""    THEN   90 

80  PRINT"entree  des  donnees  terminee" 

Le  programme  doit  lui-meme  indiquer  a  I'utilisateur  comment  Tinterrompre.  Ajoutons 
done : 

47  PRINP'pour  arreter  appuver  [ENTER]" 

Voyons  maintenant  comment  obtenir  Timpression  des  informations  enregistrees,  d'abord 
sous  forme  de  liste.  Ecrivons : 

90  FOR  X*I  TO  180 

100  PRINT  N0M*(x)?"  ";TEL$(x) 

110  NEXT 

Mais  la  encore  le  programme  ne  sait  pas  comment  s'arreter  avant  le  centieme  element  du 
tableau,  Ajoutons  done : 

95  IF  N0M$(x)=""  THEN  120 
120  PRINT "liste  terminee" 

La  chaine  vide  est  detectee  en  ligne  95  et  le  programme  interrompt  Pimpression  en 
sautant  les  lignes  1  00  et  1 1  0. 

Passons  maintenant  a  notre  objectif  suivant ;  nous  voulons  que  le  programme  soit  capa- 
ble de  rechercher  un  nom  entre  au  clavier.  Ecrivons  : 

l',0  INPUT  "nom  a  trouver  :  "'.RECHERCHE* 

140  FOR  x=l  TO  100 

150  IF  lNSTR(NClM*fx).RECHEfcLHE*i=0  THEN  1.90 

la0  PRINT  MOMS ( k  > ;  "  ":TEL*(k) 

170  END 

130  NEXT 

190  PRINT    "Lb    n  'jin    r.  >^i    r-  a  <■    r  en  <?r  t  c;>i*  ?  *■  " 

run 
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Une  nouvelle  instruction  est  apparueen  ligne150  :  INSTR.  Cette  instruction  demande 
a  l'ordinateur  de  chercher  a  I'interieur  de  la  premiere  chaine  citee.  la  premiere  occurrence 
de  la  seconde  chaine.  Autrement  dit,  il  va  chercher  dans  NOM$  une  occurrence  de 
RECHERCHE$  (la  variable  introduce  en  ligne  130,  contenant  le  nom  que  vous 
recherchez).  Si  INSTR  ne  trouve  pas  au  moins  une  partie  de  cette  chaine,  elle  fournira  la 
valeur  0,  ce  qui  dans  notre  programme  provoque  un  saut  en  ligne  180  et  done  une  nou- 
velle tentative  avec  la  valeur  suivante  de  x  (NEXT).  Si  le  programme  a  balaye  toutes  les 
valeurs  autorisees  de  x  (I  a  100),  il  peut  alors  atteindre  la  ligne  190  et  annoncer  qu'il  n'a 
pas  trouve  le  nom  demande.  S'il  le  trouve,  INSTR  fournit  une  valeur  differente  de  0.  Le 
programme  passe  alors  sur  la  ligne  160,  affichant  le  nom  et  le  numero  de  telephone, 
avant  de  s'achever  a  la  ligne  170  (END). 

Notre  programme  se  perfectionne  tres  rapidement,  mais  il  nous  reste  encore  beaucoup  a 
faire.  Prenons  done  un  peu  de  recul  et  considerons  ses  limites.  La  facon  dont  il  se  deroule, 
par  exemple  :  on  enregistre  les  informations,  puis  on  obtient  une  liste,  et  Ton  peut  enfin 
demander  la  recherche  d'un  nom  donne. 

Et  si  jamais  ? 

Et  si  jamais  cet  ordre  ne  vous  convenait  pas?  Si  vous  preferiez  commencer  par  la 
recherche  d'un  nom  enregistre  la  veille,  ou  bien  aj outer  des  noms  et  des  numeros  de 
telephone  a  ceux  qui  existent  deja  ?  Etudier  et  resoudre  ce  type  de  probleme,  e'est  cela  la 
programmation.  BASIC,  vous  le  savez,  a  la  bonte  de  vous  permettre  l'insertion  de  nouvel- 
les  instructions  dans  un  programme  existant,  mais  un  bon  programmeur  ne  doit  pas  se 
laisser  surprendre. 

Un  autre  inconvenient,  de  taille,  tient  au  fait  que  le  programme  stocke  le  contenu  des 
tableaux  dans  une  partie  de  la  memoire  effacee  a  chaque  nouvelle  execution.  Comme  il 
est  hors  de  question  que  vous  entriez  a  chaque  fois  toutes  vos  informations  a  la  main,  il 
faudra  vous  rescrver  la  possibility,  d'une  part,  de  sauvegarder  les  valeurs  des  variables 
NOM$  et  TEL$  avant  d'eteindre  votre  ordinateur  et,  d'autre  part,  de  charger  ces  valeurs 
Iors  de  lexecution  du  programme. 


Reponses 

Voici  comment  nous  allons  resoudre  le  probleme  du  deroulement  des  taches  :  nous  allons 
faire  en  sorte  qu'en  debut  d'execution,  le  programme  nous  propose  un  choix  entre  les 
differentes  operations  qu'il  est  capable  d'effectuer.  Cc  programme,  de  type  «  pilote  par 
menu  ».  affiche  effectivement  a  1'ecran  un  menu  des  options  proposees.  Vous  ctes-vous 
deja  scrvi  d'un  distributeur  automatique  de  billets  ?  Si  oui,  vous  avez  deja  eu  affaire  a  un 
programme  pilote  par  menu.  Incorporons  ce  menu  a  notre  programme : 
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32  PRINT"!,  ajouter  un  correspondant " 

33  P R I N T " 2 .  lister  les  correspondants" 

34  PRINT"3,  consulter  le  repertoire" 

35  PR1NT"4.  sauvegarder  le  repertoire" 

36  PR INT"5 .  charger  le  repertoire" 

37  INPUT  "votre  choix  (puis  ENTER) "jch 

38  ON  ch  GQSU8  40,98,138 


85  RETURN 

125  RETURN 
178  RETURN 
200  RETURN 


Comme  vous  pouvez  le  constater,  le  programme  affiche  maintenant  le  menu  des  options. 
puis  introduit  dans  la  variable  ch  le  numero  entre  au  clavier  (INPUT).  En  passant  sur 
Instruction  ON  ch  GOSUB  (ligne  38),  il  lancera  le  premier  sous-programme  (ligne  38) 
si  ch=  1,  le  deuxieme  (ligne  90)  si  ch  =  2  et  ainsi  de  suite. 

Maintenant  que  chacune  des  fonctions  est  devenue  un  sous-programme,  il  faut  obliga- 
toirement  en  indiquer  la  fm  par  une  instruction  RETURN,  ce  que  nous  avons  fait. 

Vous  souvenez-vous  du  mode  d'execution  de  RETURN  ?  A  la  fin  du  sous-programme, 
cette  instruction  BASIC  renvoie  le  programme  a  la  ligne  suivant  immediatement  l'instruc- 
tion GOSUB  correspondante,  c'est-a-dire,  dans  notre  cas,  a  la  ligne  siluee  apres  38 
(notre  programme  se  poursuivrait  done  a  partir  du  point  d'entree  des  informations,  ligne 
40).  Pour  eviter  cela,  introduisons  la  ligne  : 

39  SOTO  32 

...afin  de  (aire  boucler  le  programme  sur  1'affichage  du  menu.  Faites  encore  tourner  le 

programme  pour  constater  les  ameliorations  apportees. 

Parfait !  Voyons  maintenant  comment  notre  programme  se  presente  (si  celui-ci  n'est  pas 
arrele.  faites  [ESC]  deux  fois.  Tapez  : 

LIST 
Et  voici  ce  que  vous  devriez  avoir  sous  les  yeux  : 

10    REM    repertoire    telephonique 
20    DIM    NfJM*<100> 
30    DIM    TEL4U00) 

32  PRINT" 1 >    ajouter   un   correspondent " 

33  PRINT11 2.    lister    les   correspondants" 

34  PRINT".',    consulter    le  repertoire" 

35  PRINT"4.    sauvegarder    le  repertoire" 
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36  PRINT'S,  charger  le  repertoire" 

37  INPUT"votre  choix  (puis  £NTER)"sch 

38  ON  ch  GDSUB  40,90,130 

39  GOTO  32 

40  FOR  x  =  L  TO  100 
45  CLS 

47  PRlNT"pour  arreter  appuyer  [ENTER]" 

50  INPUT  "fiom";NQM*(xl 

55  IF  N0M$(x!=""  THEN  80 

60  INPUT  "telephone"«,TEL$(x) 

70  NEXT 

B0  PRINT"entree  des  donnees  terminee." 

85  RETURN 

90  FOR  k=1  TO  100 

95  IF  NQM$(x)=""  THEN  120 

100  PRINT  NQM*(x)j"  "}TEL*(x) 

110  NEXT 

120  PRJNT"-fin  de  liste" 

125  RETURN 

130  INPUT  "now  a  trouver "; RECHERCHE! 

140  FOR  x=t  TO  100 

150  IF  INSTR(NOM*(x),RECHERCHE*!=0  THEN  180 

160  PRINT  NOM* (x) ; "  "}T£L*(x) 

170  RETURN 

180  NEXT 

190  PRINT"ce  nom  n'est  pas  repertory." 

200  RETURN 

Vous  remarquez  qu'a  certains  endroits  nous  commencons  a  manquer  de  place  pour  insu- 
rer de  nouvellcs  lignes.  Nous  allons  en  crcer  et  remettre  un  peu  d'ordre  en  RENUM- 
erotant  les  lignes.  Faites  : 

RENUM 
LIST 

Vous  devez  maintenant  obtenir : 

18  REM  repertoire  teiephonique 

20  DIM  NOM$U80) 

30  DIM  TEU$(100) 

40  PRINT" i .  ajouter  un  correspondant " 

50  PRINT"2.  lister  les  correspondants" 

60  PR INT"3.  consulter  le  repertoire" 

70  PRINT"4.  sauvegarder  le  repertoire" 

80  PRINT"5.  charqer  le  repertoire" 

90  INPUT"votre  choix  (puis  ENTER)"|ch 
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100  ON  ch  GaSUB  120,210,270 

110  GOTO  40 

120  FOR  x  =  l  TO  100 

130  CLS 

140  PRINT"pour  arreter   appuyer  CENTER]" 

150  INPUT  "nom";NQM$(x! 

160  IF  NQM*(x>=""  THEN  190 

170  INPUT  "telephane";TEL*(x) 

180  NEXT 

190  PRINT"entree  des  donnees  terminee." 

200  RETURN 

210  FOR  x=l  TO  100 

220  IF  NOM$(x)=""  THEN  230 

238  PRINT  NOM$ (x )  ;  "  " ; T E L $  < x  > 

240  NEXT 

250  PRINT"* in  de  liste" 

260  RETURN 

270  INPUT  "nam  a  trouver";RECHERCHE* 

280  FOR  x=l  TQ  100 

290  IF  INSTR(NOM*<x),RECHERCHE*)=0  THEN  320 

300  PRINT  NOM*(x) ; "  "}TEl»<x) 

310  RETURN 

320  NEXT 

330  PRINT"ce  no*  n'ett  pas  repertorie." 

340    RETURN 

Voila  qui  est  mieux.  Continuons !  II  nous  faut  maintenant  une  instruction  qui  fera  en 
sorte  que  chaque  nouvelle  information  enregistree  soit  rangee  a  Fmterieur  de  la  premiere 
case  vide  disponible  dans  le  tableau.  Nous  allons  pour  cela  nous  servir  d'une  nouvelle 
intruction  :  LEN.  Celie-ci  permet  de  calculer  la  longueur  d'une  chaine.  Voici  ce  qu'il  faut 
indiquer  a  1'ordinateur : 

Si  (IF)  la  longueur  (LENgth)  de  NOMS(x)  est  superieurc  a  0,  autrement  dit  si  cette  case 

est  deja  occupee,  il  faut  alors  (THEN)  passer  directement  a  la  ligne  180  (qui  donnera  la 
reference  de  la  case  suivante). 

Nul  besoin.  on  le  voit,  d'etre  doue  en  anglais  pour  parler  BASIC.  Toutefois,  c'est  avant 
tout  une  question  de  bon  sens  ! 

135    IF   LEN(NOMI(x))>e    THEN    180. 

Enfantin,  n'est-ce  pas  ?  Avec  votre  liste  des  mots-cles  de  BASIC,  et  un  peu  de  reflexion, 
aucune  diftieulte  ne  pourra  vous  arretcr.  Vous  trouverez  toujours  une  instruction  repon- 
dant  exactement  a  vos  besoins  et,  avec  1'habitude,  les  solutions  vous  viendront  a  1'esprit 

comme  par  miracle. 


*2 
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Voyons  maintenant  comment  sauvegarder  les  valeurs  des  variables  afin  de  pouvoir  les 
recharger  lorsqu'on  execute  le  programme.  Vous  savez,  depuis  la  partie  7  du  Cours  Ele- 
mentaire.  que  Ton  peut  sauvegarder  le  programme  lui-meme  au  moyen  de  l'instruction 
SAVE.  Cependant.  ce  programme  n'esl  qu'un  cadre  permettant  I'entree  des  valeurs  (au 
clavier)  et  leur  sortie  (sur  l'ecran).  En  sauvegardant  le  programme  (SAVE),  vous  conser- 
vez  ce  cadre,  mais  pas  les  valeurs  clles-memcs. 

Une  partie  du  programme  devra  done  prevoir  le  stockage  des  valeurs  sur  disquette.  Nous 
allons  pour  cela  creer  un  «  fichier  de  donnees »  independant. 

II  faudra  d'abord  ouvrir  (OPEN)  un  fichier  sortie  (OUTput)  que  nous  appellerons,  par 
exemple,  «  donnees  »,  puis  ecrire  (WRITE)  a  1'interieur  de  ce  fichier  les  valeurs  (de  1  a 
100)  des  variables  NOM$(x)  et  TEL$(x)  et,  pour  finir.  refermer  (CLOSE)  ce  fichier 
avant  de  revenir  au  menu.  Cette  section  sera  placee  a  partir  de  la  ligne  350.  Laissons  a 
Tinstruction  : 

ftUTO   350 
...le  soin  de  numeroter  AUTOmatiquement  les  lignes : 

350  0PEN0UT  "donnees" 

360  FOR  x=i  TO  100 

370  WRITE  »9,NQn*(x),TEL«<x) 

380  NEXT  ..  . 

390  CL0SE0UT 

400  PRlNT"donriees  sauvees" 

410  RETURN 

Une  fois  la  ligne  410  entree  par  [RETURN],  faites  [ESC]  pour  interrompre  la  numerota- 
tion  AUTOmatique. 

Nous  venons  d'introduire  une  option  supplementaire :  il  nous  faut  done  ajouter  un 
numero  dans  la  listc  situee  apres  l'instruction  ON  ch  GOSUB.  lignc  100.  Rappelons 
la  ligne  1 00  pour  operer  cette  modification,  par  EDIT  : 

100   ON   ch    GOSUB    120,210,270,358 

Vous  pourrez  desormais,  en  choisissant  roption  4,  demander  au  programme  de  stocker 
sur  disquette  les  informations  introduites. 

Vous  remarquerez  qu'au  moment  oii  le  programme  ecrit  sur  la  disquette  les  valeurs  de 
NOMS(x)  et  de  TEL$(x),  le  mot  cle  WRITE  est  suivi  de  1'expression  #9.  Le  symbole 
tt  est  un  « sclecteur  dc  canal  »  qui  indique  a  1'ordinateur  sur  quel  canal  les  donnees  doi- 
vent  ctre  acheminees.  II  en  cxiste  10  dans  un  ordinateur : 

Si  Ton  dirige  les  donnees  sur  les  canaux  0  a  7  (de  £0  a  £7),  cellcs-ci  apparaissent  sur 
l'ecran  (les  canaux  0  a  7  sont  reserves  pour  l'ecran  et  y  definissent  des  «  fenetres  »). 


Passons  aux  choses  serieuses. . .  Chapirre  2    Page  9 


Les  donnees  envoyees  sur  te  canal  #  8  sortiront  sur  i'imprimante,  Ie  cas  echant. 

Enfin,  les  donnees  dirigees  sur  le  canal  §  9  seront  envoyees  a  1'unite  de  disques  :  c'est  ce 

que  nous  avons  fait  ligne  370. 


Une  petite  digression... 

Juste  un  mot  sur  Instruction  AUTO  que  nous  venons  d'utiliser.  Lorsque  Ton  entre,  sans 

numero  de  ligne,  l'instruction  : 

AUTO 

...l'ordinateur  se  met  a  numeroter  automatiquement  les  lignes,  en  commencant  a  10,  et 
en  progressant  de  10  en  10  a  chaque  nouvelle  ligne  entree.  Si  les  lignes  10,  20,  30,  etc. 
existent  deja  dans  votre  programme,  vous  les  ferez  apparaitre  sur  l'ecran  une  a  une  en 
actionnant  la  touche  [RETURN].  Cette  procedure  peut  vous  faire  gagncr  du  temps  lorsque 
vous  desirez  corriger  toute  une  sequence  de  lignes  espacees  de  10  en  !0. 


Revenons  a  notre  programme... 

Apres  avoir  ecril  les  instructions  pcrmctlant  le  stockage  de  nos  donnees  sur  disquette,  il 

ne  nous  reste  plus  qu'a  en  prevoir  lc  chargement,  pour  que  notre  programme  soit  termine. 
Ajoutons  done  une  nouvelle  option  au  menu  en  corrigeant  encore  une  fois  la  ligne  1 00  : 

100  ON  ch   SOSUB   120,210,278,350,420 

Voyons  maintenant  les  instructions  de  chargement.  II  faudra  d'abord  ouvrir  (OPEN)  le 
fichier  entree  (IN put)  sur  la  disquette  de  «  donnees  »,  puis  chercher  a  partir  de  cette 
disquette  (canal  U  9)  toutes  les  valeurs,  de  1  a  100,  des  variables  NOM$(x)  ct  TEL${x), 
et  enfin  refermer  le  fichier  avant  de  revenir  au  menu.  Voici  la  procedure  : 

420  QPENIN  "donnees" 

430  FOR  x=l  TO  100 

440  INPUT  #9,NDM$(x),TEL*(y> 

450  NEXT 

460  CLQSEIN 

470  PRJNT"donnees  chargees" 

480  RETURN 
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L«  fin  du  commencement... 

Le  programme  que  nous  venons  d'ecrire  remplit  maintenant  tous  les  objectifs  que  nous 
nous  etions  fixes  au  depart  lorsque  que  nous  nous  demandions  «  ce  qu'il  devrait  faire  ». 
I!  ne  nous  restc  done  plus  qu'a  ameliorcr  la  «  presentation  des  resuttats  »  a  1'ecran. 


Et  le  commencement  de  la  fin... 

D'abord  quelques  instructions  pour  mettre  le  programme  au  propre  : 

34   MODE    1 

Ceci  determine  le  mode  d'afirchage :  1'ecran  sera  efface  a  chaque  nouvelle  execution  du 
programme.  Ecrivez  ensuite : 

36   WINDOW    #1 , 7,36, 18, 14 

Cette  instruction  un  peu  obscure  ne  doit  pas  vous  effrayer :  elle  consiste  simplement  a 
dessiner  sur  1'ecran  une  petite  fenetre  pour  encadrer  le  menu.  Le  code  situe  apres  1c  mot 
WINDOW  indique  a  1'ordinateur  sur  quel  canal  cette  fenetre  sera  dirigee  (sou venez- vous 
que  nous  en  avons  8  a  notre  disposition,  de  UQ  a  *7).  Sachant  dc  plus  que  l'ordinatcur, 
s'il  n'a  pas  rccu  d'indication  particulicre,  choisit  automatiquement  le  canal  a©,  on  voit 
bien  qu'il  faut  cviter  de  dinger  notre  petite  fenetre  sur  ce  canal,  sous  peine  de  voir  s'y 
afficher  toutes  les  sorties  du  programme.  II  faudra  done  choisir  un  autre  canal  entre  #1 
et  jj7,  d'ou  l'indication  #1  sur  notre  exemple.  Les  quatre  nombres  qui  viennent  ensuite 
indiquent,  dc  manicre  on  ne  peut  plus  simple,  les  dimensions  de  la  fenetre :  ils  donnent  la 
position  des  bords  gauche,  droit,  superieur  et  inferieur  de  la  fenetre,  en  se  rcferant  aux 
numcros  de  colonnes  et  de  ligncs  de  1'ecran  (comme  pour  1'instruction  LOCATE).  Ainsi 
dans  noire  exemple.  apres  avoir  precise  que  nous  utilisions  le  canal  1 ,  nous  declarons  que 
le  bord  de  gauche  commence  en  colonne  7,  que  celui  de  droitc  finit  en  colonne  36,  que  le 
bord  superieur  commence  en  lignc  1 0  ct  que  le  bord  inferieur  finit  en  ligne  14. 

Si  nous  voulons  maintenant  que  le  menu  s'affiche  dans  cette  fenetre,  il  va  nous  falloir 
rectifier  les  lignes  40  a  80  : 

40  PRINT  #1,"1.  ajouter  un  correspondant" 
50  PRINT  *1,"2.  lister  les  correspondants" 
60  PRINT  t*l,"3.  consulter  le  repertoire" 
78  PRINT  HI, "4.  sauvegarder  le  repertoire" 
80  PRINT  HI,  "5.  charger  le  repertoire" 

Ajoutons  encore  la  ligne : 

85   LOCATE    7,25 
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Cette  instruction  sert  a  positionner  sur  l'ecran  la  demande  de  I'option  choisie.  La  presen- 
tation sera  ainsi  plus  claire. 

Vidons  maintenant  l'ecran  de  son  contenu  avant  chaque  retour  au  menu : 

110    GOTO    34 
...et  apres  chaque  selection  d'option  : 

95  CLS  . 

Ajoutons  pour  finir  les  trois  lignes  suivantes,  qui  mettront  lordinateur  en  attente  avant 
de  revenir  au  menu  : 

1B3  LOCATE  7,25 

105  PRlNT"appuyez  une  louche  pour  le  »«nu 
107  IF  INKEY$=""  THEN  107 

La  ligne  1 03  indique  l'endroit  auquel  I'ordinateur  devra  afficher  le  message  contenu  en 
ligne  1 05.  La  ligne  1 07  cherche  quelle  chaine  de  caractere  vient  d'etre  entree  au  clavier. 
Tant  que  celle-ci  sera  vide,  e'est-a-dire  tant  que  l'utilisateur  n'aura  pas  actionne  une 
touche  quelconque  du  clavier,  le  programme  bouclera  sur  cette  instruction.  Cette  instruc- 
tion a  bien  pour  effet  de  mettre  le  programme  en  attente :  celui-ci  attend  effectivement 
qu'une  touche  soit  enfoncee  pour  passer  a  la  ligne  suivante. 

Le  voila  done  lerminc,  ce  programme  !  Termine,  vraiment?  ...vous  pourriez  encore  lui 
demander  de  corriger  ou  d'effacer  des  noms  et  des  numeros  de  telephone,  de  trier  la  liste 
dans  l'ordre  alphabelique.  ou  de  vous  la  « sortir  »  sur  imprimante,  ou  bien  encore,  si  vous 
etes  tres  ambitieux,  d'emettre  des  signaux  permettant  d'appeler  automatiquement  votre 
correspondant  en  entrant  simplement  son  nom  au  clavier,  non  sans  avoir,  bien  entendu, 
demande  aux  PTT  I'autorisation  de  connecter  votre  ordinateur  au  poste  telephonique  ! 
Ces  pcrfectionnements  sont  pourtant  de  l'ordre  du  possible.  A  vrai  dire,  on  peut  ame- 
liorcr  et  pcauflner  ainsi  scs  programme  a  Tinfini,  surtout  lorsqu'on  dispose  d'un  outil 
inibrmalique  aussi  puissant  que  le  61 28.  II  Taut  pourtant  savoir  s'arreter  et  nous  allons 
laisser  ce  «  repertoire  telephonique  »  a  ce  point  en  esperant  que  vous  en  savez  dcsormais 
un  peu  plus  sur  l'art  d'ecrire  un  programme  en  partanl  de  zero.  II  ne  vous  reste  qu'a  le 
remettre  un  peu  en  ordre  en  tapant  une  dernicre  instruction  : 

RENUM 

...puis  a  le  stocker  sur  disquette,  ou  vous  en  debarrasser.  Mais  qui  sait,  il  pourrait  peut- 
etre  vous  etre  utile...  pour  noter  les  numeros  de  telephone  de  vos  amis ! 
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Void  votre  programme  termine  : 

18  REM  repertoire  telephonique 

20  Dili  NOM*  (100) 

30  DIM  TEL$(100) 

40  MODE  1 

50  WINDOW  #1,7,36,10,14 

60  PRINT  #1,"1.  ajouter  un  correspondant" 

70  PRINT  Hi, "2.  lister  lee  correspondants" 

80  PRINT  *i,"3.  consulter  le  repertoire" 

90  PRINT  #i,"4.  sauveqarder  le  repertoire" 

100  PRINT  ll, "5.  charger  le  repertoire" 

110  LOCATE  7,25 

120  INPUT"votre  choix  (puis  ENTER)";ch 

130  CLS 

140  ON  ch  GOSUB  190,290,350,430,500 

150  LOCATE  5,25 

160  PRINT"appuyer  une  touche  pour  le  menu" 

170  IF  INKEY$=""  THEN  170 

180  GOTO  40 

190  FOR  x=l  TO  100 

200  CLS 

210  IF  LEN(NOM$(x))>0  THEN  260 

220  PRINTnpour  arreter  appuyer  CENTER]" 

230  INPUT  "nom";N0M*(x> 

240  IF  N0M*(x>=""  THEN  270 

250  INPUT  "telephone";TEL$(x) 

260  NEXT 

270  PRINT"entree  des  donnees  terminee." 

280  RETURN 

290  FOR  x  =  l  TO  100 

300  IF  NQM$(x)=""  THEN  330 

310  PRINT  N0M«(x);"  "jTEL$(x) 

320  NEXT 

330  PRINT"* in  de  liste" 

340  RETURN 

350  INPUT  "noot  a  trouver "jRECHERCHE* 

360  FOR  k=1  TO  100 

370  IF  lNSTR(NOM*(x),RECHERCHE*)=0  THEN  400 

380  PRINT  N0M*(x);"  ";TEL$(x) 

390  RETURN 

400  NEXT 

410  PRINT"ce  nom  n'est  pas  repertorje." 

420  RETURN 

430  OPENOUT  "donnees" 
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440  FOR  x  =  l  TO  100 

450  WRITE  #<?,NOM*(x),TEL*(x) 

460  NEXT 

470  CLQSEOUT 

480  PRINT'dannees  sauv»ai" 

490  RETURN 

500  OPENIN  "donnees" 

510  FOR  x  =  i  TO  100 

520  INPUT  #9,NOM*(x),TEl$tx> 

530  NEXT 

540  CLOSEIN 

550  PRINT"donnBes  thargees" 

560  RETURN 

run 
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Chapitre  3 

Liste  complete  des  mots  cles 

du  BASIC  AMSTRAD  CPC6128 


IMPORTANT 

L'assimilation  de  la  terminologie  et  de  ta  notation  adoptees  dans  ee  chapi- 
tre est  indispensable.  Differents  types  de  parentheses  expliquent  l'entree 
des  commandes ;  commencez  done  par  vous  familiariser  avec  la  significa- 
tion de  chacun. 

Les  commandes  sans  crochets  doivent  rester  telles  quelles.  C'est  le  cas,  par  exemple,  de 

la  commande : 

END 

...et  vous  devez  taper  le  mot  END  en  toutes  lettres. 

Lorsqu'un  element  apparait  entre  parentheses  angulaires,  <  >  comme : 

<numero  de  ligne> 

...il  ne  faut  ni  taper  ces  parentheses,  ni  cc  qu'elles  renferment.  L'exemple  ci-dessus  indique 
le  type  de  donnees  requises  pour  la  commande.  Par  exemple : 

EDIT  <numero  de  ligne> 
...signifie  que  vous  devez  taper : 

EDIT    108 
Les  parentheses  ()  DOIVENT  elre  tapees  telles  quelles.  Dans  l'exemple  : 

COS  { <  expression  numerique  > ) 
...l'expression  numerique  doit  se  trouver  entre  parentheses.  Par  exemple : 

PRINT  C0S<45> 


Mots  cles  du  BASIC  ChapitteS    Pago  1 


Les  crochets,  pour  finir,  contiennent  les  elements  facultatifs  d'une  commande  ou  d'une 

fonction.  Par  exemplc : 

RUN  [<numero  de  ligne>] 

...signifie  que  vous  n'etes  pas  oblige  de  faire  suivre  le  mot  cle  RUN  d'un  parametre,  mais 
que  vous  pouvez.  si  vous  le  desirez,  ajouter  le  parametre  <numero  de  ligne>.  La  com- 
mande peut  alors  etre  entree  de  deux  manieres  : 

RUN   ...ou...    RUN    188 


Caracteres  speciaux 

&  ou  &H  Prefixe  pour  un  nombre  hexadecimal 

&X  Prefixe  pour  un  nombre  binaire 

#  Prefixe  pour  un  canal  d'entrees-sorties 


Types  de  donnees 

Les  chaines  peuvent  avoir  de  0  a  255  caracteres  et  sont  designees  par  <  chaine  alphanume- 
rique>.  On  peut  adjoindre  une  chaine  a  une  autre  avec  le  signe  +  et  a  condition  que  la 
chaine  qui  en  resulte  ne  depasse  pas  255  caracteres. 

Les  en  tiers  varient  de  -32768  a  +  32767  et  les  nombres  reels  de  - 1 .7E  +  38  a  +  1 .7E  +  38,  le 

plus  petit  nombre  au  dessus  de  zero  etant  2.9E-39  et  chaque  nombre  ayant  9  a  10  chiffres 
significatifs. 

Une  < expression  numerique  >  est  une  expression  qui  aboutit  a  une  valeur  numerique. 
Cela  peut  etre  des  nombres,  ou  une  variable  numerique,  ou  des  nombres  operant  avec  des 
variables  numeriques,  a  peu  pres  tout  ce  qui  n'cst  pas  <chame  alphanumerique>. 

Un  <numero  de  canal>  se  rapporte  a  une  <expression  numerique>  pour  designer  une 
fenetre  d'ecran,  une  imprimante,  une  cassette  ou  une  disqueite  vers  laquelle  le  texte  doit 
etre  achemine. 

Une  <  liste  de:element>  decrit  un  parametre  comprenant  une  liste  d'elements  separes  par 
des  virgules.  Cette  liste,  pouvant  contenir  un  ou  plusieurs  elements,  est  limitee  par  fa  lon- 
gueur dc  ligne. 

Les  differents  indicateurs  de  type  de  donnees  : 

%  Entiers 

I    Reels  (par  defaut) 

$   Chaine  aiphabetique  et  numerique  (alphanumerique) 
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Nous  allons  dormer  les  mots  cles  du  BASIC  AMSTRAD  sous  la  forme  suivante : 
MOT  CLE 

Syntaxe 
Exemple 
Description 
Mots  cles  associes 

Lcs  mots  cles  sont : 

DESCOMMANDES    :  operations  executees  directement 

DES  FONCTIONS       :  operations  intervenant  dans  une  expression 

DES  OPERATEURS    :  agissent  sur  des  arguments  mathematiques. 

Lors  du  listage  d'un  programme,  le  BASIC  transforme  en  MAJUSCULES  tous  les  mots 
cles  tapes  en  minuscules.  Les  exemples  de  ce  chapitre  sont  en  MAJUSCULES  tels  qu'ils 
apparaissent  apres  un  LISTing.  II  sera  toutefois  preferable  que  vous  les  tapiez  en  minus- 
cules car  les  mots  cles  contenant  une  erreur  resteront  LISTes  en  minuscules,  vous  revelant 
ainsi  vos  erreurs  de  frappe. 

Pour  plus  de  details  sur  le  BASIC  AMSTRAD  6128,  consultez  les  specifications 
SOFT967. 

Mots  cles... 
ABS 

A BS  ( <  expression  numerique > ) 

PRINT    ABSt-67.98! 
67.  9B 

FONCTION  :  Donne  la  valeur  ABSolue  de  l'expression  entre  parentheses.  Les  nombres 

negatifs  perdent  done  leur  signe  moins. 

Mots  cles  associes  :  SG  N 


H>; 
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AFTER 

AFTER  <delai  du  chronometre  >[,<numero  de  chronometre  >  ]  GOSUB  <numero  de 
ligne> 

10  AFTER  250  SOSUB  60:CLS 

20  PRINT"Devine  urte  lettre  en  5  secondes" 

30  a*=INKEY*:IF  Hag  =  l  THEN  END 

40  IF  a*OCHR*(INT(RND*26  +  97)  )  THEN  30 

50  PRINT  a$;"  est  exacte.tu  as  gagne  !" 

55  SOUND  1 , 478: SOUND  l,358sEND 

60  PRINT"Trop  tard.J'ai  gagne  !" 

70   SOUND    l,2000:Uag  =  l:RETURN 

run 

COMMANDE  :  Appelle  un  sous-programme  apres  (=  AFTER  en  anglais)  un  certain 
delai.  Le  <  delai  du  chronometre  >  indique  la  duree  de  I'attente  en  multiples  de  0,02 
seconde.  Le  <numero  de  chronometre  >  (qui  peut  etre  0,  1,  2  ou  3)  precise  lequel  des 
quatre  chronomelres  d'attente  il  faut  utiliser. 

Chacun  des  4  chronometres  peut  etre  associe  a  un  sous-programme.  Pour  plus  de  details 
concernant  les  interruptions,  reportez-vous  a  la  partie  2  du  chapitre  «  A  vos  heures  de 
loisir...  ». 

Mots  cles  associes :  EVERY,  REMAIN,  RETURN 
AND 

<  argument  >  AND  <  argument  > 

IF   "alain"  <    "bernard"   AND   "chien"    >   "chat"     THEN     PRINT 

"vrai"   ELSE  PRINT    "Uux" 
vrai 

IF   "bernard"    <    "alain"   AND   "chat"    >   "chien"      THEN      PRINT 

"vrai"   ELSE  PRINT    "faux" 
faux 
IF    "alain"    <    "bernard"   AND   "chat"    >    "chien"      THEN     PRINT 

"vrai"   ELSE  PRINT    "-faux" 
faux 

PRINT    1    AND    1 
1 

PRINT    0    AND    0 

0 

PRINT    1    AND   0 

0 

OPERATEUR  :  Execute  des  operations  booleennes  par  bits  sur  des  nombres  entiers.  Est 
egal  a  0  sauf  lorsque  les  deux  bits  d'arguments  sont  egaux  a  I. 

Pour  toute  information  complemeniaire  sur  la  Iogique,  consultez  la  partie  2  du  chapitre 
«  A  vos  heures  de  loisir...  ». 

Mots  cles  associes :  OR.  NOT.  XOR. 
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ASC 

ASC(<chamealphanumerique>)  •'•■■■■■         '.    vaIh  >n:,.'  -  ■■ 

PRINT   ASCC'x") 
120 

FONCTION :  Donne  la  valeur  numerique  du  premier  caractere  d'une  chaine  de  carac- 
teres. 

Mots  cles  associes  :  CHR$ 


ATN 

ATN  (<  expression  numerique  >) 

PRINT    ATNU1 
0,785390163 

FONCTION :  Calcule  l'Are  TaNgente  (reduisant  I'< expression  numeriquo  a  un  nom- 
bre  reel  en  radians  compris  entre  -PI/2  et  +  PI/2)  de  la  valeur  donnee. 

A  noter :  les commandes  DEG  et  RAD  peuvent  etre  utilisees  pour  specifier  explicitement 
que  le  resultat  sera  exprime  respectivement  en  degres  ou  radians. 

Mots  cles  associes :  COS,  DEG,  RAD,  SIN,  TAN 

AUTO 

AUTO  [<numero  de  iigne>][,<increment>]  . 

AUTO    110,58 

COMM  ANDE :  Genere  AUTOmatiquement  les  numeros  de  ligne.  Le  parametre  faculta- 
tif  <  numero  de  ligne >  donne  le  premier  numero  de  ligne  a  generer.  Si  vous  ne  le  precisez 

pas,  les  lignes  sont  generees  a  partir  de  1 0. 

L'<  increment >,  egalement  facultatif,  fixe  l'intervalle  entre  les  numeros  de  ligne.  En 
I'absence  de  specification,  il  sera  egal  a  10.  Si  un  numero  de  ligne  deja  utilise  est  genere. 
le  contenu  de  cette  ligne  apparait  a  1'ecran  el  peut  eventueliement  etre  modifie.  La  ligne 
affichee  est  ensuite  remplacee  en  memoire  apres  activation  de  la  touche  [RETURN].  Pour 
arreter  la  numerotaiion  automatique  des  lignes,  appuyez  sur  [ESC]. 

Mots  cles  associes  :  Aucun 
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BINS 

B I N  $  ( <  nombre  en  tier  sans  signe  >  [,  <  nombre  en  tier  >  ]  ) 

PRINT  BIN*<64,8) 
01000000 

FONCTION  :  Produit  une  chaine  de  chiffres  BINaires  representant  la  valeur  du  <  nom- 
bre entier  sans  signe>.  a  1'aide  du  nombre  de  chiffres  binaires  indique  par  le  deuxieme 
<  nombre  entier  >  (enire  0  et  16).  Si  ce  nombre  est  trop  grand,  le  resultat  commence  par 
autant  de  zeros  que  necessaire.  S'il  est  trop  petit,  le  resultat  n'est  pas  tronque  mais 
converti  en  autant  de  chiffres  que  necessaire. 

Le  < nombre  entier  sans  signe  >  a  convertir  en  binaire  doit  etre  compris  entre  -32768  et 
65535. 

Mots  cles  associes  :  DEC$,  HEX$,  STR$ 
BORDER 

BORDER  <numero  de  couleur>[.<numero  de  couleur>] 

10  REM   729   comb inai sons    de   bordure 

20  SPEED    INK    5,5 

30  FOR   a=0   TO   26 

48  FOR  b=8    TO   26 

50  BORDER    a.biCLSsLOCATE    14,13 

60  PRINT"bordern$a;",";b 

70  FOR    t  =  l    TO    500 

80  NEXT  t,b,a 

run 

COMMANDE :  Pour  changer  la  couleur  de  la  bordure  d'ecran.  Si  deux  couleurs  sont 
indiquees,  elles  atternent  a  la  vitesse  determinee  par  la  commande  SPEED  INK,  le  cas 
echeant.  Les  valeurs  vonl  de  0  a  26. 

Mots  cles  associes  :  SPEED  IN  K 


BREAK 

(Voir  ON  BREAK  CONT,  ON  BREAK  GOSUB,  ON  BREAK  STOP) 
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CALL 

CALL  <adresse>[,<liste  de:<parametre>] 
CALL  e 


COMMANDE :  Permet  a  un  sous-programme  externe  d'etre  appele  a  partir  du  BASIC 
L  exempie  ci-dessus  reinitialise  completement  1'ordinateur. 

A  utiliser  avec  precaution. 
Mots  cles  associes  :  UNT 


CAT 
CAT 

CAT 

COMMANDE :  Demande  au  BASIC  de  lire  le  CATalogue  de  la  disquette.  Affiche  en 
ordre  alphahumenque  les  norm  de  tous  le  fichiers  presents  ainsi  que  leur  longueur  (en 
arrondissant  au  Koctet  superieur).  Le  nombre  d'octets  disponibles  saffiche  egaiement 
avec  1  indentihcation  de  la  disquette  et  de  I'utilisateur. 

Cette  commande  n'a  pas  d'efiet  sur  le  programme  en  cours. 

Mots  cles  associes  :  LOAD,  RUN,  SAVE 

CHAIN 

CHAIN  <nomfich>(,<numero  de  ligne>] 
CHAIN   "testprog.lias",350 

COMMANDE  :  Charge  un  programme  en  memoire  a  partir  d'une  disquette,  remplacant 
le  programme  existant.  Le  nouveau  programme  commence  au  debut  ou  a  partir  de  la 

ligne  specifiee  par  <numero  de  ligne>. 

lan^^CHAIN"  (SaUVegard6s  P&r  la  commande  SAVE,p)  peuvent  etre  charges  et 
Mots  cles  associes  :  CHAIN  MERGE,  LOAD,  MERGE 


>  .j* 
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CHAIN  MERGE 

CHAIN  MERGE  <nomfich>[,<numero  de  ligne >]  ,  , 

[.DELETE  <ensemblede  lignes>] 

CHAIN  MERGE  "partie2.bas", 750, DELETE  488-480 

COMMANDE :  Charge  en  memoire  un  programme  sur  disquette  en  le  fusionnant  au 
programme  exislant,  puis  lance  le  programme  resultant,  depuis  le  debut  ou  a  partir  de  la 
ligne  specifiee  par  le  parametre  en  option,  <numero  dc  ligne>.  Si  vous  desire?,  effacer 
une  partie  du  programme  initial  avant  d'utiliser  cette  commande,  vous  pouvez  specifier  le 
parametre  <ensemble  de  lignes>  de  la  commande  DELETE.  Les  numeros  de  ligne  du 
programme  initial  identiques  a  ceux  du  programme  a  fusionner  seront  ecrasees  sur  les 
nouvelles  lignes.  Les  fichiers  proteges  (sauvegardes  par  la  commande  SAVE,p)  ne  peu- 
vent  PAS  etre  fusionnes  puis  lances  par  cette  commande. 

Mots  cles  associes :  LOAD,  MERGE,  DELETE.  CHAIN 

CHR$  ° 

CHR$  (<nombreentier>) 

18   FOR   x=32   TO   255 

28   PRINT    x;CHR$(x), 

38    NEXT 

run 

FONCTION  :  Convertit  un  <nombre  entier>  compris  entre  0  et  255  en  une  chaine  de 
caracteres  equivalent  a  1'aide  du  jeu  de  caracteres  de  1'AMSTRAD  6128,  decrit  dans 
la  partie  3  du  chapitre  «  Pour  information...  ».  Les  caracteres  0  a  31  sont  des  caracteres 
de  controle.  C'est  pourquoi  1'exemple  ci-dessus  affiche  les  entiers  compris  entre  32  et  255. 

Mots  cles  associes :  ASC 
CINT 

CINT  (< expression  numeriquo) 

10   n=1.9999 

28   PRINT  CINT(n) 

run 

2 

FONCTION  :  Convertit  une  valeur  numerique  en  un  entier  arrondi  compris  entre  -32768 

et  32767. 

Mots  cles  associes  :  CREAL.  FIX,  INT,  ROUND,  U NT 
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CLEAR 

CLEAR  :':'     ' 

CLEAR 

COMMANDE :  Efface  toutes  ies  variables,  fichiers  ouverts,  tableaux  et  fonctions  utilisa- 
teur,  le  mode  de  calcul  en  BASIC  s'effectue  en  radians. 

Mots  cles  associes  :  Aucun 

CLEAR  INPUT 
CLEAR  INPUT 

10  CL5 

20  PRINT"  tapez  plusieurs  lettret  ■aintenant  !" 

30  FOR  t=l  TO  3000 

40  NEXT 

50  CLEAR  INPUT 

run 

COMMANDE :  Efface  toutes  Ies  donnees  entrees  a  partir  du  clavier,  se  trouvant  dans  le 
tampon. 

Pour  experimenter  cetle  commandc,  lancez  le  programme  ci-dessus  et  tapez  Ies  lettres 
lorsque  vous  y  etes  invite.  Supprimez  ensuite  la  ligne  50  du  programme,  relancez-le  et 
voyez  la  difference. 

Mots  cles  associes  :  IN  KEY,  IN  KEY$,  JOY 


CLG 

CLG  [<encre>] 

LOCATE    1,20 
CLG    3 

COMMANDE  :  Efface  Pecran  graphique  et  le  ramene  a  sa  couteur  de  fond.  Si  <encre> 
est  specifiee,  le  fond  est  de  la  couleur  fixee  en  accord. 

Mots  cles  associes  :  CLS.  GRAPHICS  PAPER,  INK,  ORIGIN 


J 
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CLOSEIN 

CLOSEIN 

CLOSEIN 

COMMANDE :  Ferme  tout  fichier  d'entree  ouvert  sur  !a  disquette  (voir  OPENIN). 
Mots  cles  associes :  EOF,  OPENIN 

CLOSEOUT 

CLOSEOUT 

CLOSEOUT 

COMMANDE  :  Ferme  tout  fichier  ouvert  en  sortie  sur  la  disquette.  (voir  OPENOUT). 
Mots  cles  associes :  OPENOUT 

CLS 

GLS  [  $  <numero decanal >] 

10  PAPER  #2,3 
20  CLS  #2 
run 

COMMANDE:  Efface  la  fenetre  d'ecran  specifiee  par  le  <numero  de  canal >  et  lui 
donne  sa  coulcur  de  papier.  En  l'absence  dc  <numero  de  canal>,  0  est  pris  par  defaut. 

Mots  cles  associes  :  CLG,  INK,  PAPER,  WINDOW 

CONT 

CONT  -: 

CONT 

COMMANDE  :  CONTinue  1'execution  du  programme  apres  un  STOP,  ou  deux  activa- 
tions de  la  touche  [ESC],  si  le  programme  n'a  ete  ni  modifie  ni  protege.  Des  commandes 
directes  peuvent  etre  tapees  avant  reprise  du  programme. 

Mots  cles  associes  :  STOP 
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COPYCHRS 

COPYCHRS  ( if  <nvrtito*toeaB«it>) 

1a  cls 

20  PRINT"coin  superieur" 

30  LOCATE  1,  1 

40  a$=COPYCHR*(#0) 

50  LOCATE  1,20 

60  PRINT  a* 

run 


FONCTION  :  Copie  un  caractere  a  partir  de  la  position  du  curseur  dans  le  canal  (qui 
DOIT  etre  specific).  Le  programme  ci-dessus  copie  un  caractere  de  1'emplacement  1,1 
(angle  superieur  gauche)  et  le  reproduit  en  .1,20.  Si  le  caractere  lu  n'est  pas  reconnu,  une 
chaine  nulle  est  renvoyee. 


Mots  cles  associes  :  LOCATE 


COS 

COS  (<expre$sion  numeriquo) 

DEG 

PRINT    C0SU5) 
0.707106781 

FONCTION  :  Calcule  le  COSinus  de  F< expression  numeriquo. 

DEG  ct  RAD  peuvent  servir  a  exprimer  Pargument  en  degres  ou  en  radians,  respective- 
ment. 

Mots  cles  associes  :  ATN,  DEG.  RAD,  SIN 


CREAL 

CREAL  (< expression  numeriquo) 

10  a=Pl 

20  PRINT  CINT(a) 
30  PRINT  CREALU) 
run 

3 

3.14157265 

FONCTION  :  Convertit  P<  expression  numeriquo  en  nombre  reel. 
Mots  cles  associes  :  CI  NT 
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DECS 

DECS  (<expression  numerique>,<mdd£Ie  de  format*)"';:  --.■•?!  •■'  •■■'.  -*.  ■       ..'"*■■' 

PRINT  DECSC10 I 7,"££ ####### *#,.##") 
£10,000,000.00 

FONCTION  :  Donne  une  representation  DECimale  de  l'expression  numerique,  uti!isant 
!e  <modele  de  format  >  indique. 

Lc  modele  de  format  ne  peut  contenir  QUE  les  caracteres : 

+  -£$*?..  T 

L'cmploi  de  ces  « indicateurs  de  format  »  est  decrit  au  mot  cle  PRINT  USING. 

Mots  cles  associes :  BINS.  HEX$,  PRINT  USING,  STR$ 

DEF  FN 

DEF  FN  <nom>[(<parametres  formels>)]=  <expression> 

10  t=TIHE/30e  .   .. 

20  DEF  FNchronQ*INT(TIHE/300-t) 

30  EVERY  100  60SUB  50 

40  GOTO  40 

50  PRIN7"Le  programme  tourne  depuis"; 

60  PRINT  FNchrona; "secondes"  i_fc 

70  RETURN 

run 

COMMANDE  :  Le  BASIC  permet  au  programme  de  DEFinir  une  FoNction  retournant 
une  valeur  unique  et  de  1'utiliscr.  DEF  FN  est  la  partie  definition  du  mecanisme  de 
creation  d'une  fonction  specifique,  travail  Ian  I  dune  maniere  similaire  aux  fonctions  exis- 
tantes  du  BASIC  (COS,  SIN,  ATN.  etc.). 

(Dans  Pexcmple  ci-dessus  la  valeur  dc  la  fonction  FNchrono  est  constamment  mise  a 

jour,  meme  si  lc  programme  est  suspendu  par  [ESC]  ou  arrete  par  double  [ESC],  puis 
relance. 

Mots  cles  associes :  Aucun 
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CURSOR 

CURSOR  [<mdicateursysteme>][,<indicateur  utilisateur>]  ' 

10  CURSOR  1 

20  PRlNTquestion  ?"} 

30  a$=INKEY*:IF  a*=""  THEN  30 
40  PRINT  a$ 
50  CURSOR  0 
run 

COMMANDE :  Active  ou  desactive  l'indicateur  systeme  ou  utilisateur.  Les  parametres 
<indicateur  systeme  >  et  <indicateur  utilisateur >  doivent  etre  sur  0  (inactif)  ou  1  (actif)- 
Dans  la  commande  INKEY$  ci-dessus,  le  curseur  a  ete  rendu  visible  par  fixation  de  l'indi- 
cateur systeme  sur  1  (a  ia  ligne  1 0). 

Le  curseur  s'affiche  lorsque  les  deux  indicateurs  sont  sur  1.  Le  curseur  systeme  est  auto- 
matiquement  active  pour  la  commande  INPUT  et  desactive  pour  IMKEY$. 

II  est  preferable  de  desactiver  le  curseur  pour  affichage  d'un  texte  a  Pecran. 

Vous  pouvez  omettre  1'un  des  indicateurs  mais  pas  les  deux.  Si  un  parametre  est  omis, 
son  etat  est  inchange. 

Mots  cles  associes  :  LOCATE 


DATA 

DATA  <  liste  de:  <constante> 

10  FOR    x=l    TO    4 

20  READ  nooi*,prenoi$ 

30  PRINT"Mr.    "jnofflt;"    ";preno((i« 

40  NEXT 

50  DATA  DUP0NT,01ivier,DURAND, Francois 

60  DATA  LAMIE, Frederic, MOULIN, Daniel 

run 

COMMANDE  ;  Declare  des  donnees  constantes  a  Tinterieurd'un  programme.  Ces  don- 
nees  peuvent  etre  affectees  a  une  variable  par  la  commande  READ,  apres  quoi  le  pointeur 
passe  a  1'element  sui^/ant  de  la  liste  DATA.  La  commande  RESTORE  peut  servir  a 
deplacer  le  pointeur  sur  une  position  specifiee  de  DATA. 

Pour  de  plus  amples  informations,  consultez  la  partie  2  du  chapitre  «  A  vos  heures  de 
loisir...  ». 

Mots  cles  associes  :  READ,  RESTORE 
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DEC$ 

DEC*  (< expression  numerique>,<tnodele  de  format >) 

PRINT    DEC$(1BT  7/"«#**#'*#**'-**n) 

£10,000,000.00 

FONCTION  :  Donne  line  representation  DECimaledel'expression  numerique,  utiiisant 
le  <modele  de  format  >  indique. 

Le  modele  de  format  ne  peut  contenir  QUE  les  caracteres •: 

+  -£$**..  T 

L'emploi  de  ces  «  indicateurs  de  format  »  est  decrit  au  mot  cle  PRINT  USING. 

Motscles  associes :  BINS,  HEX*,  PRINT  USING,  STR$ 

DEFFN 

DEF  FN  <nom>[(<parametres  formels>)]=  < expression  > 

13  t=T me/300 

20   DEF   FNchrono*INT(TIME/300-t) 

30  EVERY  100  60SUB  50 

40  GOT  0  40 

50  PRINT"Le  programme  tourne  depuis"; 

60  PRINT  FNchrona; "secondes"  H» ■ . 

70  RETURN 

run 

COMM  ANDE  :  Le  BASIC  permet  au  programme  de  DEFinir  une  FoNction  retournant 
une  valeur  unique  et  de  I'utiliser.  DEF  FN  est  la  partie  definition  du  mecanisme  de 
creation  d'unc  fonction  specifique.  travail  la  nt  d'une  maniere  similaire  aux  fonctions  exis- 
tantes  du  BASIC  (COS,  SIN.  ATN.  etc.). 

{Dans  rcxemplc  ci-dessus  la  valeur  de  la  fonction  FNchrono  est  constamment  mise  a 
jour,  memc  si  le  programme  est  suspendu  par  [ESC]  ou  arrcte  par  double  [ESC],  puis 
relance. 

Mots  cles  associes :  Aucun 
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DEFINT 

DEFINT  <Iistede:<lcttresconcernees>         '  :  :■■.  ■  ■■  :-.<.. ;.-■'■..■■■ 

18  DEFINT  n 

20  no*bre=123.45o 
30  PRINT  nodibre 
run 
123 

COMMANDE :  Defmit  le  type  de  variable  par  DEFaut,  le  type  etant  entier.  Lorsqu'une 
variable  intervient  sans  marqueur  (!  %  $),  le  type  par  defaut  est  automatiquement  mis  en 
ceuvre.  Cette  commande  defmit  le  type  par  defaut  des  variables  seion  la  premiere  lettre 
du  nom  de  la  variable.  Elle  peut  etre  suivie  d'une  liste  d'initiales.  Par  exemple  : 

DEFINT    a,b,c 
...ou  d'une  fourchette  d'initiales  ; 

DEFINT   a-z 
Mots  cles  associes  :  DEFREAL,  DEFSTR 

DEFREAL 

DEFREAL  < liste  de: < Iettres  concemees > 
DEFREAL   x,a-f 

COMMANDE  :  Defmit  le  type  de  variable  par  DEFaut,  le  type  etant  reel.  Lorsqu'une 
variable  intervient  sans  identificateur  de  type  (!  %  $),  le  type  par  defaut  est  automati- 
quement mis  en  auvre.  Le  type  de  la  variable  sera  determine  suivant  la  premiere  lettre  du 
nom  de  la  variable.  Elle  peut  etre  suivie  d'une  liste  d'initiales : 

DEFREAL   a,b,c 
...ou  d'une  fourchette  d'initiales  : 

DEFREAL   a-z 
Mots  cles  associes  :  DEF1IMIT,  DEFSTR 


■■&* 
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DEFSTR 

DEFSTR  <  liste  de:  <lettres  concernees> 

10  DEFSTR  n 

20  nam="A*stradn 
30  PRINT  naa 
run 
Anstrad 


COMMANDE :  Definit  le  type  de  variable  par  DEFaut,  le  type  etant  une  chaine.  Lors- 

qu'une  variable  intervient  sans  identificateur  (!  %  *)  le  type  par  defaut  est  automati- 
quement  mis  en  ceuvre.  Le  type  de  la  variable  est  determine  selon  la  premiere  lettre  de  son 
nom.  La  commande  peut  etre  suivie  d'une  liste  d'initiales  : 


DEFSTR  a,b,c 
...ou  d'une  fourchette  d'initiales: 

DEFSTR  a-2 
Motscles  associes  :  DEFINT,  DEFREAL 

DEG 

DEC 

DEG 


COMMANDE  :  Etablit  le  mode  de  calcul  en  DEGres.  Par  defaut,  les  fonctions  SIN, 
COS,  TAN  et  ATN  considerent  que  I'argument  qui  leur  est  transmis  est  exprime  en 
radians.  La  commande  reste  valable  jusqu'a  ce  qu'on  utilise  les  commandes  RAD  ou 
NEW,  CLEAR,  LOAD.  RUN.  etc. 


Mots  cles  associes  :  ATN.  COS,  RAD,  SIN,  TAN 
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DELETE 

DELETE  <ensemble  de  lignes>  ■-.■-..- 

DELETE    100-280 

COMMANDE :  Efface  une  partie  du  programme  defini  dans  l'<ensemble  de  Iignes>. 

II  n'est  pas  necessaire  d'indiquer  la  ligne  de  depart  ou  la  ligne  d'arrivee  pour  effacer  Ie 
programme  «  depuis  Ie  debut »  ou  « jusqu'a  la  fin  ». 

DELETE  -200 
...ou  : 

DELETE  50- 
...ou :  ■ 

DELETE 
...qui  efface  !a  totalite  du  programme.  .lASHtjKlon-T 

Mots  cles  associes  :  CHAIN  MERGE,  RENUM 

DERR 

OERR 

LOAD    "xyz.abc"  ';-'<.-  ■■:■■■  ?.. ■■-■  :  > . 

XYZ   .ABC  not  found 

Ready 
PRINT  DERR 
146 

FONCTION  :  Rapporte  le  dernier  code  d'ERReur  envoye  par  le  systeme  de  gestion  de 

la  Disquette.  La  valeur  de  DERR  peut  servir  a  confirmer  I'erreur  detect.ee.  Consultez  la 
liste  des  messages  d'erreur  du  chapitre  «  Pour  information...  ». 

Mots  cles  associes  :  ERL,  ERR.  ERROR,  ON  ERROR  GOTO.  RESUME 
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DI 

Dl 


10  CLSiTAQtEVERY  10  GOSUB  90 

20  xl=RND*320sx2=RND*320 

32  y=200+RND 1200 :c*=CHR*(RND* 255) 

40  FOR  x=320-xl  TO  320tx2  STEP  4 

50  Dl 

60  MOVE  320,0, l:MOVE  x~2,yiMOVE  x,y 

70  PRINT"  ";c*;:FRAME 

30  EltNEXTsGQTO  20 

90  MOVE  320,0:DRAW  x+8,y-t6, I l RETURN 

run 


COMMANDE :  Desactive  une  Interruption  (autre  que  [ESC]  )  jusqu'a  ce  qu'elle  soit 
reactivee  directement  par  une  commande  El  ou  indirectement  par  un  [RETURN]  a  la 
fin  d'un  sous-programme  d'interruption  GOSUB. 

L'entree  dans  un  sous-programme  d'interruption  desactive  automatiquement  les  inter- 
ruptions de  priorite  egale  ou  inferieure. 

On  I'utilise  quand  le  programme  doit  s'executer  sans  interruption,  par  exemple  quand 
deux  sous-programmes  sont  en  competition  pour  utiliser  les  ressources  de  I'ordmateur 
(les  ressources  graphiques  dans  le  programme  ci-dessus,  par  exemple). 

Pour  de  plus  amples  informations  sur  les  interruptions  consultez  la  partte  2  du  chapitre 
«  A  vos  heures  dc  loisir...  ». 

Mots  cles  associes  :  AFTER,  El,  EVERY,  REMAIN 
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DIM 

Dl M  <  liste  de:  <  variable  Wfdicee >  SQ 

ia  cls 

20  DIM  ami$(S),tel*(5) 

38    FOR   n  =  l    TO    5 

40   PRINT"telephone   No";n 

50    INPUT    "entrez    le  nofli";a«u$(n) 

60    INPUT    "entrez    le  nusero  de  tel . ";tel»(n> 

70   PRINT 

80   NEXT 

70  FOR  n=l    TO  5 

100  PRINT  n;a»ii(n),telt(n) 

110  NEXT 

run 

COMMANDS  :  DIMensionne  un  tableau.  Cette  commande  alloue  l'espace  requis  aux 

tableaux  et  specific  les  valeurs  d'indices  maximales.  Le  BASIC  doit  connaitre  l'espace 
reserve  pour  un  tableau,  en  fabsence  de  specification  il  prend  10  comme  valeur  par 
defaut. 

Un  tableau  est  identifie  par  une  <  variable  indiceo,  a  savoir  un  nom  de  variable  accom- 
pagne  d'un  ensemble  d'indices  afin  que  chaque  «  element  »  du  tableau  ait  sa  propre  valeur 
d'indice. 

Une  boucle  FOR  NEXT  peut  servir  a  controler  le  tableau  en  traitant  chaque  element  du 
tableau  a  tour  de  role. 

La  valeur  minimale  d'un  indice  est  zero  (e'est  le  premier  element  d'un  tableau). 

Les  tableaux  peuvent  etre  multi-dimensionnels  et  chaque  element  est  reference  par  sa 

position.  Par  exemple,  dans  un  tableau  dimensionne  par : 

DIM  position$*20,20,20> 

...un  element  du  tableau  sera  reference  de  la  facon  suivante  : 
position* (4, 5, 6) 

Mots  cles  associes  :  ERASE 
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DRAW 

DRAW  <coordonnee  x>,<coordonnee  y>  [,[<encre>][,< mode  d'encro]] 

10   MODE   BiBORDER   0:PAPER   0:  INK   0,0 
20    x  =  RND*640:y=RND*400:z=RNDU5 
30    DRAW   x,y,z 
40   GOTO    20 
run 

COMM ANDE :  Trace  une  ligne  sur  l'ecran  entre  la  position  du  curseur  graphique  et  une 
position  absolue  specifiee  par  les  coordonnees  x  et  y.  L'  <encre>  de  tracage  peut  etre  spe- 
cifiee  (entre  0  et  1 5). 

Le  <mode  d'encro  facultatif  determine  1'interaction  de  1'encre  sur  I'affichage  present  a 
l'ecran.  Les  quatre  <  modes  d'encro  sont  les  suivants  : 

0:  Normal 

I:XOR(OUexclusif) 
2:  AND  (ET) 
3:  OR  (OU) 

Mots  cles  associes :  DRAWR.  GRAPHICS  PEN,  MASK 

DRAWR 

D  RAWR  < decalage  x  > , < decalage  y > [,[ <encre >][,  < mode  d'encre >]] 

10  CLS;PRINT"tu  montes  au  premier  !?" 

20  MOVE  0,350:FQR  0*1  TO  8 

30  DRAWR  50,0 

40  DRAWR  0,-50 

50  NEXTsMOVE  348(0iFlLL  3     . 

60  GOTO  60 

run 

COMM  ANDE :  Trace  une  ligne  sur  l'ecran  graphique  a  partir  du  curseur  graphique  jus- 
qu'a  la  position  specifiee  par  les  <decalages  x  et  y>.  L'<encre>  du  trace  peut  etre  speci- 
fiee (entre  0  et  1 5). 
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Le  <mode  d'encre>  facultatif  determine  i'interaction  de  1'encre  sur  I'affichage  present  a 
l'ecran.  Les  4  < modes  d*encre>  sonl  les  suivants : 

0:  Normal 

l:XOR(OUexclusi0 

2:AND(ET) 

3:  OR  (OU)  ^ 

Mots  cles  associes :  DRAW,  GRAPHICS  PEN,  MASK  :j 


EDIT 

EDIT  <numero  de  ligne> 

EDIT   20 
COMM ANDE :  Affiche  la  Iigne  du  programme  ainsi  que  le  curseur,  pret  a  l'edition. 
Mots  cles  associes  :  AUTO,  LIST 

EI 
El 

EI 

COMMANDE  :  Active  (Enables)  une  Interruption  desactivee  par  Dl. 

Des  interruptions  desactivees  par  un  sous-programme  d'interruption  sont  automati- 
quement  retablies  par  ia  commande  RETURN,  en  fin  de  sous-programme. 

Pour  de  plus  amples  informations,  consultez  la  partie  2  du  chapitre  «  A  vos  heures  de 
loisir...  ». 

Mots  cles  associes;  AFTER,  Dl,  EVERY,  REMAIN 

ELSE 

(voir  IF) 
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END 

ENO  ">nts«iis;  ^  ■■:■■■  ■ 

END 

COMMANDE :  Met  fin  a  1'execution  d'un  programme  et  retablit  le  mode  direct.  Un  pro- 
gramme peut  contenir  un  nombre  quelconque  de  commandes  EN  D  (elle  est  implicite  a  la 
fin  de  tout  programme  BASIC  AMSTRAD). 

Mots  cles  associes  :  STOP 


ENT 

ENT  <numero  d'enveloppe  >    [,<  section  d'enveloppe  >]  [,< section  d'enveloppe>] 

[, < section  d'enveloppe  >]  [, < section  d'enveloppe  > } 

[,  <  section  d'enveloppe  >  ] 

IB  ENT  1,16,-50,10,10,50,10 

20  SOUND  1,500,200, 10, ,1 
run 

COMMANDE:  Definit  l'ENveloppe  de  Tonalite  specifiee  par  le  <numero  d'enve- 
ioppe>  (entre  1  et  15)  utilisee  avec  la  commande  SOUND.  Si  le  <numero  d'enveloppe> 
est  negatif  (entre  -1  et  -15)  1'enveloppe  se  repete  jusqu'a  la  fin  de  la  duree  du  son  fixee  par 
la  commande  SOUND. 

Chaque  <  section  d'enveloppe  >  peut  contenir  2  ou  3  parametres : 

Dans  le  cas  de  trois  parametres,  ceux-ci  sont : 

<nombredepas>  ,  omplitudedu  pas>  ,  <dureedu  pas>. 

Param&tre  1  :  < nombre  de  pas> 

Specifie  le  <  nombre  de  pas>  de  variation  de  tonalite  a  l'interieur  de  la  section  d'enve- 
loppe. Par  exemple,  dans  une  section  de  note  durant  10  secondes,  vous  pouvez  fixer  10 
pas  de  1  seconde  chacun.  Dans  ce  cas,  le  <  nombre  de  pas>  sera  10. 

Le  <  nombre  de  pas>  peut  varier  de  0  a  239. 
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Parametre  2 :  <  amplitude  du  pas> 

Doit  etre  compris  entre  -128  et  + 127.  Les  pas  negatifs  augmentent  la  hauteur  de  la  note, 
les  pas  positifs  l'abaissent.  La  periode  sonore  minimale  est  de  0.  Toutes  les  periodes  sono- 
res  disponibles  sont  presentees  au  chapitrc  «  Pour  information...  ». 

Para  metre  3 :  <  duree  du  pas> 

Specifie  la  duree  d'un  pas.  par  unites  de  0,01  seconde.  Elle  peut  varier  de  0  a  255  (0  a  la 
valeur  256),  la  duree  maximale  d'un  pas  est  done  de  2,56  secondes.  Si  vous  n'utilisez  que 
deux  parametres,  ce  sont : 

< periode  sonore >,< duree  du  pas> 


Pa  ra  metre  1  :  <  periode  sonore  > 

Donne  la  nouvelle  valeur  de  la  periode.  (Voir  le  parametre  2  de  la  commande  SOUND) 

Parametre  2  :  <duree  du  pas> 

Specifie  la  duree  du  pas  unique  en  unites  de  0,01  seconde.  Peut  varier  entre  0  et  255  (0 
ayant  la  valeur  256),  soit  2,56  secondes. 

generalites 

La  duree  totale  des  pas  ne  doit  pas  depasser  le  parametre  <  duree  >  de  la  commande 
SOUND,  car  le  son  se  termine  alors  avant  d'avoir  traverse  la  totalite  des  pas.  (Le  reste 
de  1'enveloppe  de  tonalite  est  alors  ignore).  De  meme,  si  la  < duree >  de  la  commande 
SOUND  depasse  la  duree  totale  des  pas,  le  son  se  poursuit  apres  avoir  traverse  tous  les 
pas  et  demeure  constant  a  la  tonalite  finale. 

La  commande  ENT  peut  s'accompagner  de  5  <  sections  d'enveloppe>  differentes  (cha- 
cune  constitute  des  2  ou  3  parametres  ci-dessus). 

Le  premier  pas  d'une  enveloppe  de  tonalite  s'execute  immediatement. 

Chaque  fois  qu'une  nouvelle  enveloppe  est  attribute  a  un  numero  d'enveloppe  determine, 
la  definition  precedente  est  perdue. 

Un  <  numero  d'enveloppe >  sans  <  section  d'enveloppe >  annule  toutes  les  specifications 

precedentes. 

Pour  de  plus  amples  informations,  consulted  la  partie  2  du  chapitre  «  A  vos  heures  de 
loisir... ». 

Mots  cles  associes  :  ENV,  SOUND 
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ENV 

E  N V  <  numero  d'en veloppe  >     [,  <  section  d'enveloppe  >  ]  t»  <  section  d'en veloppe  >  ] 

[,  <  section  d'enveloppe  >  ]  [,  <  section  d'en  veloppe  >  ] 

[,< section  d'enveloppe  >]  . 

10  ENV  1,15,-1,10,15,1,10 
20  SOUND  1,200,300,15,1 
run 

COMMANDE :  Definit  PENveloppe  de  Volume  cdrrespoodant  au  <numero  d'enve- 
loppe >  (entre  1  et  15).  utilise  avec  la  commande  SOUND. 

Elle  peut  contenir  2  ou  3  parametres : 

Pour  3  parametres : 

<nombre  de  pas >,< amplitude  du  pas>,<duree  du  pas>. 

Para  met  re  1  :  <nombredepas> 

Specifie  Ic  <  nombre  de  pas>  de  volume  qu'un  son  doit  traverser  dans  la  section  d'enve- 
loppe. Par  exemple,  dans  une  section  de  10  secondes,  vous  pouvez  fixer  10  pas  de  volume 
dune  seconde.  Le  parametre  <  nombre  de  pas>  est  egal  a  10. 

Le  parametre  peut  varier  de  0  a  127. 

Parametre  2  :  < amplitude  du  pas> 

Peut  faire  varier  le  volume  de  0  a  15  par  rapport  au  pas  precedent.  Les  16  volumes  diffe- 
rents  sont  les  memes  que  ceux  de  la  commande  SOUND.  Le  parametre  <  amplitude  du 
pas>  peut  cependant  varier  de  -128  a  +  127.  le  volume  revenant  a  0  apres  avoir  atteint 
15. 

Parametre  3 :  <duree  du  pas> 

Specifie  la  durec  d'un  pas  en  unites  de  0,01  seconde.  Peut  varier  de  0  a  255  (0  a  la  valeur 
256),  soit  2,56  secondes. 
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Pour  2  parametres : 

< enveloppe  materielle>,<periodede  l'envek>ppe>      )■■■•:■■  i$pn,.-.  ■-....■ 

Parametral  :  <  enveloppe  materielle> 

Specifie  la  valeur  a  envoyer  au  registre  d'enveloppe  contenu  dans  le  generateur  sonore. 

Para  met  re  2  :  <periode  de  l'enveloppo 

Specifie  la  valeur  a  envoyer  aux  registres  de  periode  d'enveloppe  contenus  dans  le  genera- 
teur sonore. 

L'utilisation  d'enveloppes  materielles  suppose  la  connaissance  du  materiel.  Si  vous  ne 
l'avez  pas,  il  vaut  mieux  utiliser  une  enveloppe  logicielle  integrant  un  parametre  <  duree 
du  pas>  adequat. 

GENERALITIES 

La  duree  totale  des  pas  ne  doit  pas  depasser  le  parametre  de  <duree>  de  la  commande 
SOUND,  le  son  se  termine  alors  avant  d'avoir  traverse  tous  les  pas  de  volume  (le  reste 

de  I'enveloppe  est  ignore). 

De  meme,  si  le  parametre  de  <duree>  de  la  commande  SOUND  depasse  la  duree  totale 
des  pas,  le  son  se  poursuit  apres  avoir  traverse  tous  les  pas  de  volume  et  demeure  constant 
au  volume  final. 

La  commande  ENV  peut  contenir  5  sections  d'enveloppes  differentes  (constitutes  des  2 

ou  3  parametres  ci-dessus). 

Le  premier  pas  d'une  enveloppe  de  volume  s'execute  immediatement. 

Chaque  fois  qu'une  nouvelle  enveloppe  est  attribuee  a  un  numero  d'enveloppe  determine, 
la  definition  precedente  est  perdue. 

La  specification  d'un  < numero  d'enveloppe >  sans  <  section  d 'enveloppe >  annuletoutes 
les  valeurs  precedentes. 

Pour  de  plus  amples  informations,  consultez  la  partie  2  du  chapitre  «  A  vos  heures  de 
loisir...  ». 

Mots  cles  associes  :  ENT,  SOUND 


Chapitre  3    Page  24  Mots  cl6s  du  BASIC 


EOF 

EOF 

18  OPENIN  "exl.bas" 

20  WHILE  NOT  EOF  Uixt    Jar.    ■ 

30  LINE  INPUT  #9,a» 

40  PRINT  a« 

50  WEND 

60  CLOSEIN 

run 

FONCT10N :  Pour  tester  l.'etat  d'un  fichier  ouvert.  Donne  -  1  (vrai)  si  Ton  est  en  fin  de 
fichier  (Enf  Of  File)  ou  si  aucun  fichier  n'est  ouvert,  sinon  donne  0  (faux). 

Mots  cles  associes :  OPENIN,  CLOSEIN 

ERASE 

ERASE  <  liste  de:  <  nomde  variable  > 

DIM  a(100>,b$(100> 

ERASE    a,b$ 

COMMANDE  :  Quand  un  tableau  n'est  plus  necessaire,  il  peut  etre  efface  (ERASE)  afin 
de  liberer  la  memoire  pour  d'autres  utilisations. 

Mots  cles  associes :  DIM 


ERL 

ERL 

10   ON   ERROR   BOTO   30 

20  BOTO  1000 

30  PRINT"L'erreur  est  en  ligne";ERL 

40  END 

run 

FONCTION  :  Donne  le  numcro  de  ligne  de  la  derniere  erreur  rencontree.  Dans  1'exemple 
ci-dessus  TERreur  de  la  Ligne  20  est  indiquee  par  la  fonction  ERL. 

Mots  cles  associes  :  DERR,  ERR,  ERROR,  ON  ERROR  GOTO,  RESUME 
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ERR 

ERR 

GOTO  500  asd.lW   K-'- 

Line  does  not   mist  ""':T? 

Ready 
PRINT    ERR 
B 

FONCTION  :  Donne  le  numero  de  la  derniere  ERReur  d6tectee.  Voir  la  liste  des  messa- 
ges d'erreur  au  chapitre  «  Pour  information... ».  Dans  1'exemple  ci-dessus,  le  numero 
d'erreur  8  correspond  a  «  Line  does  not  exist »  (Ligne  non  existantc). 

Mots  cles  associes :  DERR,  ERL,  ERROR,  ON  ERROR  GOTO,  RESUME 


ERROR 

ERROR  <nombreentier> 

10   IF   INK£Y*=""    THEN    10   ELSE   ERROR    17 
run 

COMMANDE  :  Decide  une  action  consecutive  a  une  erreur  numerotee.  Voir  la  liste  des 
messages  d'erreur  I  a  32  au  chapitre  «  Pour  information...  ».  L'action  est  la  meme  que 
celle  prevuc  par  le  BASIC  en  cas  d'erreur  reelle,  faisant  appel  a  un  sous-programme  de 
traitement  d'erreur,  le  cas  echeant,  et  rapportant  les  valeurs  appropriees  d'ERR  et  ERL. 

ERROR  accompagne  d'un  <nombre  entier>  compris  entre  33  et  255  peut  servir  a  creer 

des  messages  d'erreur  personnalises  tels  que  : 

10  ON  ERROR  GOTO  100 

20  INPUT  "entrez.un  caractere";a* 

30  IF  LEN(a*K>l  THEN  ERROR  100 

40  GOTO  20 

100  IF  ERR=100  THEN  110  ELSE  130 

110  PRINT  CHR*(7) 

120  PRINT"j'ai   dit  UN  caractere    !* 

130    RESUME    20 

run 


Mots  cles  associes  ;  ERL,  ERR,  ON  ERROR  GOTO,  RESUME 
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EVERY 

EVERY  < periode du chronometro  [,<  numero  du chronometro]  GOSUB  < numero  de 
tigne> 

10  EVERY  58,1  GOSUB  30 

20  GOTO  20 
30  SOUND  1,20 

40  RETURN                ,  .,  .     ,         ,    . 
run  '■'"'    '  "'' " 

COMMANDE:  Appelle  un  sous-programme  du  BASIC  a  intervalles  reguliers.  La 
<  periode  du  chronometro  specifie  I'intervalle  par  unites  de  0,02  seconde.  Le  <  numero 
de  chronometre  >  (compris  entre  0  et  3)  specifie  lequel  des  quatre  chronometres  utiliser. 
Le  chronometre  3  correspond  a  la  priorite  superieure  et  le  0  a  la  priorite  inferieure.  Cha- 
que  chronometre  peut  etre  associe  a  un  sous- program  me. 

Pour  de  plus  amples  informations  sur  les  interruptions.  consultc*  la  partie  2  du  chapitre 
«  A  vos  heures  de  loisir...  ». 

Mots  cles  associes  :  AFTER,  REMAIN 


EXP 

EXP  (<expression  numeriquo 

PRINT  EXP(6.876> 
968.743625 

FONCTION  :  Calcule  «e»  a  la  puissance  donnee  par  l'< expression  numeriquo  ou 
« e »  est  egal  a  2,7182818  environ,  le  nombre  dont  le  logarithme  naturel  est  !. 

Mots  cles  associes  :  LOG 


FILL 

FILL  <encrc> 

10   MODE    0 

20    FOR    n=l    TO    500 

30    PRINT    "Q"i 

40    NEXT 

50  coulstvlo=2+RNDtl3 

60  FILL  coulstylo 

70   GOTO    50 

run 

COMMANDE  :  Remplit  une  zone  arbitraire  de  I'ecran  graphique.  Les  bords  de  la  zone 
sont  delimites  par  les  lignes  dessinees  avec  1'encre  du  stylo  en  cours  ou  avec  l'encre  du 
fond  (comprise  entre  0  et  15).  Le  remplissage  part  de  la  position  du  curseur  graphique.  Si 
celui-ci  se  trouve  sur  un  bord.  rien  n'est  rempli. 

Mots  cles  associes  :  GRAPHICS  PEN 
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FIX 

.  ■■'jntoaerii'i 
FIX  (<expression  numeriquo) 

PRINT    F  IX  (9.  99999)  i  ,M    >  ?■  ■ 

9  f 

FONCTION  :  Enleve  la  partie  decimale  d'une  < expression  numeriquo  en  arrondissant 
toujours  par  defaut. 

Mots  cles  associes :  CINT,  INT,  ROUND 
FN 

(voirDEFFN) 


FOR 

FOR  <  variable  simple>  =  < debut >  TO  <fin>[ST£P  <increment>]  ■■.      ; 

10   FOR  0=2   TO  8  STEP  2 

20   PRINT   n; 

30   NEXT   n 

48  PRINT", qui    va  augaenter    !" 

run 

COMMANDE :  Execute  la  partie  du  programme  se  trouvant  entre  ies  mots  cles  FOR  et 
NEXT  autant  de  fois  que  Ton  peut  ajouter  1*< increment >  a  la  < variable  simple >  en 
partant  du  <debut>  jusqu'a  la  <fln> .  Si  r<increment>  est  omis,  il  prend  implicitement 

la  valeur  1 . 

La  valeur  de  r<mcrement>  peut  etre  negative.  Dans  ce  cas  la  valeur  du  parametre 
<debut>  doit  etre  superieure  a  celle  du  parametre  <fin>,  faute  de  quoi  la  variable  ne 

peut  etre  incrementee. 

Les  boucles  FOR  NEXT  peuvent  etre  imbriquees. 

L'affectation  du  nom  de  variable  a  la  commande  NEXT  est  facultative  car  le  BASIC 
determine  automatiquement  la  commande  NEXT  a  Iaquelle  est  associee  une  commande 
FOR. 

Mots  cles  associes  :  NEXT,  STEP,  TO 
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FRAME 

FRAME 


112    MODE    0 

20  PRINT"5ans  FRAME" 

30  TAG 

40  MOVE  0,208 

50  FOR  x=0  TO  500  STEP  4 

60  IF  f=l  THEN  FRAME 

70  MOVE  x,200 

80  PRINT"  ";CHR5(M3)5 

90  NEXT 

100  IF  i-\    THEN  RUN  ■  \ 

110  CLS  ■  '  :|-K 

120  TAGOFF 

130  FRINT"avec  FRAME" 

140  *»1 

150  GOTO  30 

run 


COMM ANDE  :  Synchronise  l'ecriture  des  graphiques  avec  les  trames  video.  II  en  resulte 
un  mouvement  plus  harmonieux  des  caracteres  ou  des  graphiques  a  1'ecran  sans  distor- 
sion  et  sans  scintillement. 

Mots  cles  associes :  TAG,  TAGOFF 


FRE 

FRE  ^expression  numeriquo) 

FRE  (<:chaincalphanumerique>) 

PRINT   FRE(0) 
PRINT    FREC") 

FONCTTON  :  Indique  l'espace  disponible  en  memoire.  La  forme  FRE  ("  ")  force  I'ordi- 
naieur  a  mettre  de  lordre  avant  dc  donner  la  valeur  de  l'espace  disponible. 

REMARQUE  :  Le  BASIC  n'cxploite  que  ie  bloc  0  de  la  memoirc. 
Mots  cles  associes :  HIMEM,  MEMORY 
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■  -x 


GOSUB 

GOSUB  <numcrodeligt»>:  5-: 

gosub  210  -'■?:  '■; 

COMMANDE  :  Appelle  un  sous-programme  BASIC  en  se  branchanl  sur  la  ligne  indi- 
quee.  La  fin  du  sous-programme  est  marquee  par  la  commande  RETURN  renvoyant  le 
programme  a  l'instruction  suivant  la  commande  GOSUB. 

Mots  cles  associes  :  RETURN 

GOTO 

GOTO  <numerode  ligne > 

SQTO  90 
COMMANDE :  Se  branche  sur  le  numero  de  ligne  indique. 
Mots  cles  associes :  Aucun 

GRAPHICS  PAPER 

GRAPHICS  PAPER  <encre> 

10  NODE  0 

20  MASK  15 

33  GRAPHICS  PAPER  3 

40  DRAW  640,0 

run 

COMMANDE :  Determine  l'<encre>  du  fond  graphique.  Lors  du  tracage  de  Iignes,  le 
fond  n'est  pas  visible.  Dans  I'exemple  ci-dessus,  la  commande  MASK  permet  le  tracage 
d'unc  ligne  en  tirets  et  la  visualisation  du  fond  graphique. 

L'encre  du  fond  (entre  0  et  1 5)  sert  a  la  zone  «  paper  »  sur  laquelle  s'affichent  les  caracte- 
res,  Iorsquc  TAG  fonctionne,  et  fait  office  de  valeur  par  defaut  lors  de  l'effacement  des 
fenetres  graphiques  a  l'aide  de  CLG. 

Mots  cles  associes  :  CLG,  GRAPHICS  PEN,  INK.  MASK,  TAG,  TAGOFF 
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GRAPHICS  PEN 

GRAPHICS  PEN  [<encre>][,<modedu  fond>] 

10  MODE  a 

20  GRAPHICS  PEN  15 

30  MOVE  200,0 

40  DRAW  200,400 

50  MOVE  63?, 0 

60  FILL  15 

run 

COMMANDE :  Fixe  F<encre>  (entre  0  et  15)  pour  le  dessiti  des  lignes  et  le  positionne- 
ment  des  points.  Le  <mode  du  fond>  peut  egalement  etre  fixe  ; 

0:  Fond  opaque 
1:  Fond  transparent 

(Le  fond  transparent  a  une  influence  sur  le  fond  graphique  des  caracteres  ecrits  avec  TAG 
et  les  espaces  en  lignes  pointillees). 

Vous  pouvez  omettre  1'un  des  parametres  mats  pas  les  deux.  Si  Fun  des  parametres  est 
omis,  la  valeur  specifiee  reste  inchangee. 

Motscles  associes :  GRAPHICS  PAPER,  INK,  MASK,  TAG,  TAGOFF 


HEX$ 

H EX$  ( <  nombre  entier  sans  signe>  [, <  largeur  de  zone>]  ) 

PRINT    HEX$<255,4) 
08FF 

FONCTION :  Change  un  nombre  entier  en  un  nombre  HEXadecimal  equivalent  en 
accord  avec  le  nombre  de  chiffres  hexadecimaux  indique  par  la  <  largeur  de  zone>  (entre 
0  et  16).  Si  ce  nombre  est  trop  grand,  Texpression  finale  est  completee  par  des  zeros  a 
gauche  du  nombre.  S'il  est  trop  petit,  elle  ne  sera  PAS  tronqucc  mais  le  nombre  de  chiffres 
produit  sera  egal  au  nombre  requis. 

Le  < nombre  entier  sans  signe>  a  convertir  sous  forme  hexadeeimale  doit  produire  une 

valeur  comprise  entre  -32768  et  65535. 

Mots  des  associes  :  BIN$,  DEC$,  STR$,  UNT 


M3HT 
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HIMEM 

HIMEM  '' ;"'"  *  '■  l-^-'r  :'t'-r^--«v>.li    v  ■■  .'^'iU 

PRINT  HIMEM 
4261? 

FONCTION  :  Donne  Padresse  de  l'octet  le  plus  Haut  dans  la  MEMoire  utilisee  par  le 
BASIC  (modifiable  par  la  commande  MEMORY). 

REMARQUE  :  I.c  BASIC  n'exploite  que  le  bloc  0  de  la  memoire. 

Mots  cles  associes :  PRE,  MEMORY,  SYMBOL,  SYMBOL  AFTER 


IF 

IF  expression  logiquo  THEN  <option>[ELSE  <optton>] 

10  MODE    1 

20  x=CINT(RND*100>. 

30  PRINT"devinez    un    chHfro    (0   a    100)" 

40  INPUT  n 

50  IF  n<K  THEN  PRINT  nj"est  trop  petit..." 

60  IF  n>x  THEN  PRINT  n;"est  trop  grand..." 

70  IF  n  =  x  THEN  88  ELSE  c*c+lsG0TQ  40 

80  PR2NT"Bien  vu!  ";"Trouve  en";c+l; "f ois  !" 

run 


COMMANDE :  Determine  si  l'< expression  logiquo  est  vraie  pour  executer,  le  cas 

echeant,  la  premiere  <  option  >.  Si  F<  expression  logiquo  est  fausse,  l'<  option  >  placee 
apres  ELSE  s'execute.  En  absence  de  deuxieme  <option>,  le  BASIC  passe  a  la  Iigne  sui- 
vante. 

Les  commandes  IF  THEN  peuvent  etre  imbriquees  mais  se  terminent  a  la  fin  de  la  ligne. 
On  ne  peut  done  PAS  avoir  de  declarations  independantes  de  IF  THEN  sur  la  meme 
Iigne.  Lorsque  le  resultat  de  ]"  expression  logiquo  necessile  un  saut  de  ligne,  la  com- 
mande peut,  par  exemple,  se  formuler  : 

IF  a  =  l   THEN   100 

...ou  : 

IF   a=l    GOTO   1B0 

...ou : 

IF   a=l    THEN   GOTO    100 

Mots  cles  associes  :  ELSE,  GOTO,  THEN 
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INK 

INK  <encre>,<ffumero  de  couleur  >[,<numero  de  cou!cur>] 

10    MODE    liPAPER    BtPEN    I 

20   FOR  p=0   TO    1 

38    FAR    i=0   TO   26 

40    INK.   pfi 

50    LOCATE    16, 12l PRINT"  INK" j p; H »" S i 

60    FOR    t=l    TO    400:NEXT    t,i,p 

70    INK   B, 1 : INK   i,24:CLS 

run 

COMMANDE  :  Affecte  la  ou  Ies  couleurs  a  une  encre  donnee.  Le  parametre  <encre> 
fournit  la  reference  de  I'encre  (par  un  entier  compris  entre  0  et  1 5).  a  l'intention  des  com- 
mandes  PEN  ou  PAPER  correspondantes.  Le  premier  parametre  <numero  decouleur> 
(entier)  donne  une  valeur  de  couleur  comprise  entre  0  et  26.  Si  le  second  parametre  de 
couleur  facultatif  est  specifie,  I'encre  passe  d'une  couleur  a  1'autre  selon  une  vitesse  definie 
par  la  commande  SPEED  INK. 

Mots  clcs  associes  :  GRAPHICS  PAPER,  GRAPHICS  PEN.  PAPER,  PEN, 
SPEED  INK 


INKEY 

INKEY  (<nombre  entier>) 

10    IP    INKEY <55><>32    THEN    10  *<    ■ 

20   PRlNT"vous   venez   d'appuyer    [SHIFT]    et    V" 
30   CLEAR    INPUT 
run 

FONCTION  :  Interroge  le  clavier  pour  indtquer  les  touches  pressees.  Le  clavier  est  ana- 
lyse tous  les  cinquantiemes  de  seconde.  Cette  fonction  sert  a  detecter  la  position  haute  ou 
basse  d'une  louche  par  detection  de  la  valeur  -1  (independante  de  t'etat  des  touches 
[SHIFT]  et  [CONTROL]). 

Dans  1'exemple  ci-dessus.  lc  systeme  detecte  l'actionnement  simultane  de  [SHIFT]  et  V 
(numero  de  touche  55)  avant  d'arreter  le  programme.  Les  numeros  de  touche  sont  dortnes 
dans  le  diagramme  situe  en  haut  a  droite  du  boitier  de  1'ordinateur  (voir  egalement  le 
chapitre  «  Pour  information...  ». 


\  iMvit   ,  :  \j  K. 
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[SHIFT]  et  [CONTROL]  sont  identifies  par  les  vaieurs  suivantes : 


Valeur 

[SHIFT] 

[CONTROL] 

touche  specifiee 

-1 

INDIFFERENT 

INDIFFERENT 

RELEVEE 

0 

RELEVEE 

RELEVEE 

ENFONCEE 

32 

ENFONCEE 

RELEVEE 

ENFONCEE 

128 

RELEVEE 

ENFONCEE 

ENFONCEE 

160 

ENFONCEE 

ENFONCEE 

ENFONCEE 

Mots  cles  associes :  CLEAR  INPUT.  INKEY$,  JOY 


INKEYS 


INKEY$ 

10 
20 
30 
40 
50 
60 
70 
80 
90 
run 


CLS 

PRINT"choisissez 

a*=INKEY* 

IF  a$  =  ""  THEN  30 

IF  a*="o"QR  a*="0" 

IF  a$="n"0R  a$="N" 

GOTO  30 

PRINT"Voub  avez  chaisi 

PRINT"Vous  avez  choisi 


QUI  ou  NON  (0/N> 


THEN 
THEN 


80 
90 

our 

NON' 


.END 


yi»  jfvfj 


FONCTION  :  Interroge  le  clavier  pour  introduire  dans  le  programme  toute  chafne  de 
caracteres  entree.  Si  aucune  touche  de  clavier  n'est  actionnee,  INKEY$  renvoie  une 

chame  vide.  Dans  Texemple  ci-dessus  les  lignes  40  et  70  commandent  au  programme  de 
revenir  a  la  ligne  30  apres  interrogation  du  clavier  par  la  fonction  INKEY$. 

Mots  cles  associes  :  CLEAR  IN  PUT,  IN  KEY 


INP 

INP  (<numero  du  port>) 

PRINT    INPUFF77I 
255 


FONCTION  :  Lit  la  valeur  contenue  dans  un  port  d'entrees-sorties  dont  Padresse  est 
transmise  par  1'argument  de  cetle  fonction. 

Mots  cles  associes  :  OUT.  WAIT 
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Mots  ctes  du  BASIC 


INPUT 

INPUT [#  <num*fb<*e«aitti>,M{«*aitte>  <separateur>]  ■    ■'■  ■:•■■■■■'■-■<>•■•■ 

<liste  de:  <  variable  > 

10  MODE  1  ,.-,., 

20  INPUT  "donnez-moi  deux  nontbres  a  multiplier  (separes  p 

ar  une  virgule} ";a,b 

30  PRINT  a;"foi5";b;'*'font"5a*b 

40  GOTO  20 

run 

COMMANDE:  Recoit  les  donnees  en  provenance  du  canal  precise  (canal  tl  0  en 
l'absence  de  specification). 

Un  point-virgule  apres  INPUT  supprime  le  passage  a  la  ligne  apres  execution  de  la  com- 

mande. 

Le  <separateur>  peut  etre  un  point-virgule  ou  une  virgule.  Un  point-virgule  place  apres 
la  chaine  fait  apparaltre  un  point  d'interrogation ;  une  virgule  le  supprime. 

Si  une  entree  erronec  est  effectuee,  un  O  pour  un  0  par  exemple,  BASIC  repond  : 

?Redo  from  start 

...ou  tout  autre  message  d'erreur  programme  par  vos  soins. 

Toute  reponse  au  clavier  doit  se  terminer  par  (RETURN]. 

Mots  cles  associes :  LINE  INPUT 
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INSTR  «■. 

INSTR  ( [<position  de  depart >,]<chaine  cd*leaall$te>,<chat»ec«»teni«>) 

10   CLSiFOR    n=l    TO   26 

20  alphabet$=alphabet$+CHRt<n+64> 

30   NEXT 

40  INPUT  "entrez  une  lettre";a« 

50   bi=UPPER$<a$l 

6U  PRINT  b*i"  est  en  position"; 

70   PRINT    INSTRUlphabet$,b$)5 

80   PRINT"dans    r alphabet, "s  PRINT 

90   GOTO   40 

run 

FONCTION  :  Cherche  dans  la  <chame  contenanto  Poccurence  de  la  <chaine  conte- 
nue>  et  indique  la  position  de  la  premiere  occurence  de  la  chaine  recherchee.  En  son 

absence,  la  fonction  indique  la  valeur  0. 

La  position  du  debut  de  la  recherche  est  facultative,  elle  est  specifiee  par  le  parametre 
<  position  de  depart  >  sous  ia  forme  d'un  en  tier  compris  entre  1  et  255. 

En  cas  de  recherche  infructueuse,  la  fonction  retoume  la  valeur  0. 

Mots  cles  associes  :  Aucun 


INT 

INT  (<expression  numeriquo) 

PRINT    INK-1.995) 
-2 

FONCTION  :  Arrondit  au  premier  entier  inferieur,  enlevant  la  partie  fractionnaire.  Iden- 
tique  a  FIX  pour  les  nombres  positifs,  il  donne  1  de  moins  que  FIX  pour  les  nombres 
negatifs  qui  ne  sont  pas  des  entiers. 

Mots  cles  associes  :  CINT,  FIX,  ROUND 


!-■•'    :'    ■«•(«, 


^ 
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JOY 

JOY  (< nombre  entier>) 

18  PRINT"Pour  arreter   1b  programme  -   "; 

20  PRINT"   actionnez    la  manette  de  jeu" 
32    IF    JOY<8><>0    THEN    END 
40   BOTO    10 
run 

FONCTION :  La  fonction  JOY  lit  I'etat  de  la  manette  de  jeu  specifiee  par  le  <  nombre 
entier>  (0  ou  1 ).  Le  resultat  n'a  de  signification  qu'en  binaire. 

Bit  Decimal 


0:  Haut 

1 

I:  Bas 

2 

2:  Gauche 

4 

3:  Droite 

8 

4:  Tir  2 

16 

5:  Tir  1 

32 

Ainsi,  lorsque  vous  appuyez  sur  le  bouton  de  « tir  »  (Tir  2)  de  la  premiere  manette  en 
deplacant  celle-ci  vers  la  gauche,  la  fonction  JOY  (0)  envoie  une  valeur  decimale  egale  a 
20,  soil  16  (Tir  2)  +  4  (Gauche). 

Pour  de  plus  amples  informations,  consultez  le  chapitre  «  Pour  information... ». 
Motscles  associes :  CLEAR  INPUT,  INKEY 

KEY 

KEY  <numero  logique  de  touche>,<chaine  alphanumeriquo 

KEY    11, "border    13:paper   0:pen    1 i ink  0,13:ink    l,0:*odo  2s 

list    "+CHR*<13i 

Appuyez  sur  la  touche  [ENTER). 

COMM  ANDE  :  Associe  unc  chaine  a  la  touche  (KEY)  correspondant  au  <  numero  logi- 
que de  touche >  specifiee.  II  existe  32  numeros  logiques  de  touche  (de  0  a  31).  occupant 
les  touches  128  a  159.  Lcs  touches  128  (0  sur  le  clavier  numerique)  a  140  ([CONTROL] 
[ENTER]  sur  lc  clavier  numerique)  som  associees  par  defaut  aux  chiffres  O  a  9,  au  point 
decimal,  a  [RETURN]  et  a  RUN"  [RETURN]  -  (pour  la  cassette),  mais  peuvent  etre  asso- 
ciees a  d'autres  chaines  si  necessaire.  Les  numeros  logiques  de  touche  13  a  3 1  (touches  141 
a  159)  sont  affccies  a  des  chaines  vides  par  defaut  mais  peuvent  etre  ctendus  et  associes  a 
des  touches,  a  ['aide  de  la  commande  KEY  DEF. 
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Le  <numero  logique  de  toucho  fourni  dans  la  commande  KEY  doit  etre  compris  entre 
0  et  31  ou  entre  128  et  159  pour  correspondre  aux  numeros  physiques  des  touches  du 
clavier  numenque.  (Voir  la  representation  des  touches  au  chapitre  «  Pour  informa- 
tion... »). 

La  chaine  specifiee  ne  doit  pas  depasser  120  caracteres  au  total .  Le  depassement  de  cette 
Iimite  entraine  une  crreur  (5)  «  Improper  argument  »  (argument  incorrect). 

Mots  cles  associes  :  KEY  DEF 


KEY  DEF 

KEY  DEF    <  numero  de  toucho, < repetition >[,< normal >[,<avec  shift >    f  <avec 

control  >  J]] 

KEY   159,"c*est  la  touche  TAB" 
KEY   DEF   68,1,15? 

Appuyez  sur  la  petite  touche  [TAB] 

COMMANDE :  Definit  la  valeur  logique  d'une  touche  (KEY)  DEFinie  par  son  numero 
physique,  compris  entre  0  et  79  (voir  Illustration  des  numeros  de  touche  en  haut  a  droite 
dc  1'ordinateur  ou  au  chapitre  «  Pour  information...  »).  Lcs  parametres   <normal> 
<avec  shift>  et  <avec  control >  doivent  contenir  les  valeurs  a  envoyer  lorsque  la  touche 
est  cnfoncee,  seule,  avec  [SHIFT]  ou  avec  [CONTROL],  Ces  parametres  sont  lacultatifs 


Le  parametre  <  repetition  >  permet  d'activer  et  de  desactiver  la  fonction  d'auto-repetition 
(1  ou  0).  La  vitesse  de  celle-ci  est  reglable  par  la  commande  SPEED  KEY. 

Dans  1'exempie  ci-dessus,  la  touche  159  (correspond ant  au  numero  logique  31)  est 

d  abord  associee  a  une  chaine.  La  commande  KEY  DEF  definit  ensuite  la  touche  68 
(touche  [TAB]  )  pour  acttver  I'auto-repetition  (1)  et  envoyer  la  valeur  <norma!>  159 

lorsque  la  touche  est  enfoncee. 

Pour  revenir  au  mode  normal : 

KEY   DEF   68,0,9 
...9  etant  la  valeur  ASCII  normale  de  [TAB]. 
Mots  cles  associes :  KEY,  SPEED  KEY 
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LEFTS 

LEFT$  { <cha?he  alphanumerique > ,  <  longueur  requise> ) 

10  CLS 

20    a$="AMSTRAD" 

30    FOR    n=l    TO   7 

40  PRINT   LEFT*U*,n> 

50    NEXT 

run 

FOMCTION  •  Extrait  un  certain  nombre  de  caracteres  (entre  0  et  255)  a  gauche  d'une 
<chaine  alphanumerique  > .  Si  ia  chaine  est  plus  courte  que  la  longueur  requise,  elle  est 
utilisee  entierement. 

Mots  cles  associes :  MID$,  R1GHT$ 

LEN 

LEN  (<  chaine  alphanumerique >) 

10  LINE   INPUT   "entrez   une  phrase";at 

20   PR1NT"U   phrase   est    longue   de"} 
30   PRINT    lENU*);"caracteres." 
run 

FONCTION  :  Donne  le  nombre  de  caracteres  de  la  <chalne  alphanumerique  > ,  les  espa- 
ces  compris. 

Mots  cles  associes :  Aucun 

LET 

LET  <  van able>  =  < expression > 
LET   x=!00 

COMMANDE  :  Un  restc  des  BASIC  historiques,  pour  Icsquels  on  devait  annonccr  ses 
variables.  Seulement  utile  pour  la  compatibility  avec  des  programmes  anteneurs.  En 
AMSTRAD  BASIC,  il  suffil  d'ecrire : 

x  =  100 

Mots  cles  associes :  Aucun 
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LINE  INPUT 

LINE  INPUT  ft  [  <  numero  de  cx^>i](;]f<<chfelne>  <separateur>] 

<  variable  en  chaine> 

10  LINE  INPUT  "tapez  une  ligne  de  texte  ponctuet. "?»« 

28  CLS 

30  PRINT"la  variable  a*  est  bien  egale  a  :-" 

48  PRINT  a$ 

run 

COMMANDE :  Recoit  une  ligne  entiere  en  provenance  du  canal  indique  (#  0  en 
['absence  de  specification).  Le  premier  [;]  point-virgule  facultatif  supprime  le  retour  cha- 
riot/saut  de  ligne  qui  intervient  normalement  aprcs  execution  de  ia  commande. 

Le  <separateur  >  peut  etre  un  point-virgule  ou  une  virgule.  Le  point-virgule  entraine  I'af- 
fichage  d'un  point  d'interrogation  ;  la  virgule  le  supprime. 

L'entree  de  LINE  INPUT  au  clavier  se  termine  par  r activation  de  la  touche  [RETURN]. 

LI  N  E  I N  PUT  en  provenance  du  canal  §  9  de  Ia  disquette  (ou  de  la  cassette)  se  termine  par 
un  retour  chariot  ou  par  l'affectation  de  plus  de  255  caracteres  a  la  <  variable  en  chaine> . 

Mots  cles  associes  :  INPUT 


LIST 

L I  ST  [  <  ensemble  de  lignes  >  ][,  <  numero  de  canal  >  ] 
LIST    100-1000, #1 

COMMANDE :  Ltste  le  programme  sur  le  canal  desire,  n  0  est  1'ecran,  ft  8  est  Pimpri- 

mante.  Le  LISTage  peut  etre  provisoirement  interrompu  si  vous  appuyez  une  fois  sur  la 
touche  [ESC],  pour  etre  ensuite  repris  a  l'aide  de  la  barre  d'espacement.  Si  vous  appuyez 
deux  fois  sur  [ESC],  vous  arretez  le  listage  et  revenez  au  mode  direct. 

Vous  pouvez  omettre  le  premier  ou  le  dernier  numero  de  ligne  du  parametre  <  ensemble 
de  lignes>  pour  lister  le  programme  depuis  le  debut,  ou  jusqu'a  la  fin. 

Exemples : 

LIST    -200 
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...ou: 

LIST  at*- 

...ou : 

LIST 
...liste  la  totalite  du  programme. 
Mots  cles  associes  :  Aucun  >J  9X9    - 

LOAD 

LOAD  <nomfich>[,<adresse>] 

LOAD   "Hchdi§c.)cyz",i2flFB 

COMM  ANDE  :  Charge  en  memoire  un  programme  BASIC  se  trouvant  sur  disquette,  en 
ecrasant  tout  programme  en  place.  Avec  1'option  de  l'adresse,  charge  un  fichier  binaire  a 
1'adresse  indiquee  au  lieu  de  l'adresse  a  laquelle  il  se  trouvait  au  moment  de  la  sauvegarde. 

Un  programme  protege  ne  peut  PAS  etre  charge  par  la  commande  LOAD  car  il  est  alors 

immediatement  efface  de  la  memoire.  Dans  ce  cas.  utilisez  RUN  ou  CHAIN. 

Mots  cles  associes:  CHAIN,  CHAIN  MERGE.  MERGE,  RUN,  SAVE 

LOCATE 

LOCATED <numero  de  canal  >,]<coordonnee  x>  ,<coordonnee  y> 

10  MODE  1 

20  FOR  n=i  TO  20 

30  LOCATE  n,n 

40  PRINT  CHR«(143);"pofiition"; 

50  PRINT  n;\"jn 

60  NEXT  :■■-.-■ 

run 

COMMANDE :  Deplace  le  curseur  de  texte  vers  une  nouvelle  position  relative  au  coin 
superieur  gauche  de  la  fenetre  (WINDOW).  //  0  represente  le  canal  par  defaut. 

Mots  cles  associes  ;  WINDOW 


Mots  cl6a  du  BASIC  Chapitre  3    Page  41 


LOG 

LOG  (<expression  numeriquo)  -fit*  T?].: 

PRINT    106(9999} 
9.21024037 

FONCTION  :  Calcule  le  LOGarithme  naturel  d'une  expression  numerique  (superieure  a 
0). 

Mots  cles  associes :  EXP,  LOG  10 

LOG  10 

LOG  10  <  expression  numerique  >) 

PRINT  LOB10(9999) 

3.99995657 

FONCTION  :  Calcule  le  LOGarithme  a  base  1©  de  P<  expression  numeriquo  (supe- 
rieure a  zero). 

Mots  cles  associes :  EXP,  LOG 

LOWERS 

L0WER$  (<chaine  alphanumeriquo ) 

10    a*="REGARDEZ    COMMENT    LES    LETTRES    SUNT    CHANGEES    " 

20    PRINT    LQWER*U*  +  "EN    TYPE    MINUSCULE") 

run 

FONCTION  :  Change  toutes  les  majuscules  d'une  chaine  alphanumerique  en  minuscules. 
Utile  quand  on  attend  des  reponses  composees  d'un  melange  de  majuscules  et  de  minus- 
cules. 

Mots  cles  associes  :  UPPERS 


iftHV 
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MASK 

MASK  [<nombre  entier>][,< trace  du  premier  point >] 

IB  MODE  8:INK  S,21i INK  8,16 

20  MOVE  -100*RND,400tRND 

30  WHILE  XPQS<640 

40  FDR  x=l  TO  8 

50  MASK.  2t(8-x) 

60  DRAWR  32,0,x,l:MOVER  -32,0 

70  NEXT 

80  MOVER  34,0 

90  WEND: GOTO  20 

run 

COMM ANDE :  Definit  le  modele  a  utiliser  pour  le  trace  des  lignes.  La  valeur  binaire  du 
<nombre  entier>  comprise  entre  0  et  255  active  (1)  ou  desactive  (0)  les  bits  dans  chaque 

groupe  adjacent  de  8  pixels. 

Le  parametre  <  trace  du  premier  point  >  determine  si  le  premier  point  de  la  ligne  doit  etre 
trace  (I)ou  non  (0). 

Vous  pouvez  omettre  Tun  des  parametres  mais  pas  les  deux.  Si  vous  en  omettez  un,  sa 

specification  demeure  inchangee. 

Mots  cles  associes :  DRAW.  DRAWR.  GRAPHICS  PAPER,  GRAPHICS  PEN 


MAX 

MAX  ( < liste  de:< expression  numeriquo) 

10  n=66 

20  PRINT  r1AX(l,n,3,6,4,3) 

'hi-:    run 
66 

FONCTION  :  Donne  la  valeur  la  plus  grande  (MAXimale)  de  la  liste. 

Mots  cles  associes  :  M I N 
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MEMORY 

MEMORY  <adresse>   '    .      "■■''■ 
MEMORY    *20AA 

COMMANDE :  Definit  la  quantite  de  memoire  BASIC  disponible  en  flxant  l'adresse  de 
l'octet  le  plus  eleve. 

REM  A  RQU  E  :  Le  BASIC  n'exploite  que  le  bloc  O  de  la  memoire.  ;  % 

Mots  cles  associes :  FRE,  HIMEM,  SYMBOL,  SYM BOL  AFTER  ■ 

MERGE 

MERGE  <nomfich> 

MERGE   "nouversi.bas" 

COMMANDE  :  Charge  un  programme  a  partir  de  la  disquette  et  l'ajoute  au  programme 

deja  en  memoire. 

Les  numeros  de  ligne  du  programme  en  place  se  retrouvant  dans  le  nouveau  programme  . 
sont  automatiquement  ecrases. 

Les  fichiers  proteges  (SAuVEgardes  par  SAVE.p)  ne  peuvent  PAS  etre  fusionnes  avec 
un  autre  programme  en  place. 

Mots  cles  associes  :  CHAIN,  CHAIN  M  ERG  E.  LOAD 


MID$ 

MID$  {<chame  alphanumerique>,< position  de  depart >[,< longueur  de  la  sous- 
chaine>] ) 

10  MODE  1: ZONE  3 

20  a*="ENCYClOPEDIE" 

30  PRINT"Regardez  comment  tpeler  ";a$    Mhfi    . 

40  PRINT 

50  FOR  n  =  l  1,0  LENU*} 

60  PRINT  MID«(a*fnll), 

70  FOR  t*l  TO  700SNEXT  t,n 

80  PRINT: PRINT 

90  INPUT  "entrez  un  nouveau  mot":a$ 

100  GOTO  50 

run 
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FONCTION :  Renvoie  une  nouvelle  sous-chaine  commencant  a  la  < position  de  depart  > 
de  la  <chaine  alphanumeriquo  et  contenant  le  nombre  de  caracteres  correspondent  a 
la  <  longueur  de  la  sous-chaine> .  Si  le  parametre  <  longueur  de  la  sous-chaino  n'est  pas 
specific,  la  fonction  renvoie  le  reste  de  la  <  chaine  alphanumeriquo  a  partir  de  la  posi- 
tion de  depart  >. 

Si  la  < position  de  depart  >  est  superieure  a  la  longueur  totale  de  la  <chaine  alphanumeri- 
que>,  une  chaine  vide  est  renvoyee.  La  < position  de  depart  >  est  comprise  entre  1  et  255, 
la  <  longueur  de  la  sous-chaino  entre  0  et  255. 

Mots  cles  associes  :  LEFTS,  RIGHT$ 


MIDS 

MID$  (  <variable  chaine>,< position  d'insertion>[,< longueur  de  la  nouvelle  chatne>]) 

=  <  nouvelle  chaine 
alphanumeriquo 

18  a*="bonjour" 

28  rHD*(a*,3,2)»"XX" 

30  PRINT  a* 

run 

boXXour 

COMMANDE/  Insere  dans  la  chaine  specifiee  une  <  nouvelle  chaine  alphanumeriquo 
d'un  nombre  de  caracteres  donne,  a  la  < position  d' insertion:*. 

Lorsque  vous  utilisez  MIDS  en  tant  que  COMMANDE,  vous  devez  faire  appel  a  une 
<  variable  chaino,  tel  que  A$.  et  non  PAS  a  une  constante  comme  «  bonjour  ». 

Mots  cles  associes  :  LEFT$,  RIGHTS 


MIN 

M I N  ( <  liste  de:  <  expression  numerique  > ) 

PRINT    r1IN<3,6,2.999I8,9,) 

2.999 

FONCTION  :  Donne  la  valeur  la  plus  petite  (MINimale)  de  la  <  liste  de:< expressions 
numeriques>. 

Mots  cles  associes  :  MAX 
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MOD 

< argument  1>  MOD  <argument2> 

PRINT    18  MOD  3 

1 
PRINT    13   MOD   5 

a 

OPERATEUR  :  Donne  le  reste  de  la  division  entiere  de  l'< argument  i>  par  1' < argu- 
ment 2  >  {on  dit  <argument  1>  MODulo  <argument  2>). 

Mots  cles  associes  :  Aucun 

MODE 

M  O  D  E  <  nombre  entier  > 

10  D't+liIF  a>2  THEN  «*0 

20  MDDE  in 

30  PRINT"Ceci  est  le  «ode";m 

40  PRINF'Pressez  une  touche" 

50  IF  INKEY*s»«  THEN  6OT0  50  ELSE  10 

run 


COMM  ANDE :  Modifie  le  mode  d'ecran  (0, 1  ou  2)  et  retablit  sur  Pecran  l'encre  0,  meme 
si  l'encre  actuellement  utilisee  par  le  papier  est  differente.  Toutes  les  fenetres  et  curseurs 
sont  reinitialises. 

Mots  cles  associes :  WINDOW,  ORIGIN  .  . 


MOVE 

MOVE  <coordonnee  x>,<coordonnee  y>[,[<encre>][,<mode  d'encre>]] 

10   MODE    1 : TAG 

20    x=RND*800-100:y=RND*430 

30   MOVE   x,y 

40   P R I N T " j e    suis  ici"s 

50  SOTO  28  -.-:,■:■> 

run 

COMM  ANDE  :  Positionne  le  curseur  graphique  au  point  absolu  specifie.  Le  parametre 
facultatif  <encre>  (compris  entre  0  et  15)  permet  de  changer  la  couleur  du  stylo 
graphique. 


% 
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Le  parametre  facultatif  <  mode  d'encro  determine  l'interaction  de  I'encre  sur  1'affichage 
en  place  a  I'ecran.  II  existe  4  <modes  d'encro  : 


Normal 

XOR  (OU  exclusif) 

AND  (ET) 
OR(OU) 


Motscles  associes  :  MOVER.  ORIGIN,  XPOS,  YPOS 


MOVER 

MOVER  <decalage  x>,<decalage  y>[,[<encre >][,<, mode  d'encro]] 

18  MODE  1  i  TAG:H0VE  0,16 

20  PRINT"la  vie  a  set"; 

30  FOR  n=l  TQ  10 

40  MOVER  -45,16 

50  PRINTuhauts"i:NEXT!PRINTH  tt"j  ' 

60  FOR  n=l  TO  10 
70  MOVER  -64,-16 
80  PRINT"bas";:NEXT 
run 

COMMANDE  :  Positionne  le  curseur  graphique  en  coordonnees  relatives  (par  rapport 

a  la  position  actuelle).  Le  parametre  facultatif  <encre>  (compris  entre  0  et  15)  permet  de 
changer  la  couleur  du  stylo  graphique. 

Le  parametre  facultatif  <  mode  d'encre  >  determine  l'interaction  de  I'encre  sur  i'affichage 
en  place  a  Pecran.  II  existe  4  <modes  d'encro  : 

0:  Normal 

1:  XOR  (OU  exclusif) 

2:  AND  (ET) 

3:  OR  (OU) 

Mots  cies  associes  :  MOVE,  ORIGIN,  XPOS,  YPOS 


tu> 
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NEW 
NEW 

NEW 

COMMANDE:  Efface  le  programme  et  les  variables  en  memoire.  Les  definitions  de 
touches  ne  sont  pas  effacees  et  Pafflchage  reste  ce  qu'i!  etait  (MODE,  PEN,  PAPER, 
INK  etc.). 

Mots  cles  associes  :  Aucun 

NEXT  Mi 

NEXT  [ < liste  de:< variable >]  ,  ,.  ■      -j      «-*■- 

10  FOR  a=l  TO  3 

28  FOR  b  =  0  TO  26 

30  MODE  1 

40  PEN  a: BORDER  b 

50  PRINT"PEN"}ai"BORD£R";b 

60  FOR  c  =  i  TO  500  • -: ;  J? q  { :  ;  ■ 

70  NEXT  c,b,a 

run 

COMMANDE:  Marque  la  fin  d'une  boucle  commencee  avec  FOR.  La  commande 
NEXT  peut  etre  anonyme  ou  peut  se  rapporter  au  FOR  concerne.  Dans  t'exemple  ci- 
dessus,  la  <  liste  de;variable>  doit  apparaitre  en  sens  inverse  de  la  specification  des  com- 
mandes  FOR,  afin  d'eviter  le  chevauchement  des  boucles  imbriquees. 

Mots  cles  associes :  FOR,  STEP,  TO 

NOT 

NOT  <argument> 

IF  NOT    "alain"   <    "bernard"   THEN   PRINT   "vrai"    ELSE      PRINT 

Maux" 

faux 

IF  NOT  "chat"  >  "chien"  THEN  PRINT   "vrai"  ELSE  PRINT 

"faux" 

vrai 

PRINT  NOT  -1 

0 
PRINT  NOT  0 
-1 

OPERATEUR  :  Execute  des  operations  par  bit  sur  des  entiers.  Inverse  chaque  bit  de  ['ar- 
gument. Pour  dc  plus  amples  informations,  consultez  la  partie  2  du  chapitre  «  A  vos 
heures  de  loisir...  ». 

Mots  cles  associes  :  AND.  OR,  XOR 
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ON  BREAK  CONT 

ON  BREAK  CONT  ■v,>.,.i,:-v:v:-, 

10    ON    BREAK    CONT  . 

20   PRINT"Le   programme   CONTinuera    si    vou*  tssayez    o«   fairt  IB 

reak*   avec    U   touche    CESC]":PRINT 

.30    FOR    t  =  l    TO    1000:NEXT:GOTO    20 

run 

COMMANDE  :  Annule  Taction  de  la  touche  [ESC],  empechant  r arret  du  programme. 
Cette  commande  est  a  utiliser  avec  precaution  car  )e  programme  ne  peut  alors  etre  inter- 
rompu  que  par  reinitialisation  complete  de  l'ordinateur  (vous  devez  done  sauvegarder  le 
programme  avant  de  le  lancer). 

Vous  pouvez  desactiver  ON  BREAK  CONT  par  ON  BREAK  STOP  a  1'interieur  d'un 

programme. 

Mots  cles  associes :  ON  BREAK  GOSUB,  ON  BREAK  STOP 


ON  BREAK  GOSUB 

ON  BREAK  GOSUB  <numero  de  ligno 

10  ON  BREAK  GOSUB  40 

20  PRINT"le  programme  tourne" 

30  GOTO  20 

40  CLS;PRINT"Appuyer    2   fais    C E S C 3 , " ; 

50  PRINT"appeUe    le   sous-programme" 

60  FOR  t=l  TO  2000:NEXT 

70  RETURN 

run 

COMMANDE:  Demande  au  BASIC  de  passer  an  sous-programme  specific  par  le 
<numero  de  ligne>  lorsque  vous  appuyez  deux  fois  sur  [ESC]. 

Mots  cles  associes  :  ON  BREAK  CONT.  ON  BREAK  STOP,  RETURN 


Mots  cles  du  BASIC  Chapitre  3    Page  49 


ON  BREAK  STOP 

ON  BREAK  STOP 

10  ON  BREAK  60SUB  40  * 

20  PRINT"le  programme  tourne* 

30  GOTO  20 

40  CLS:PRINT"Appuyer  2  fois  [ESC],"; 

50  PRINT"appel le  le  sous-programme" 

60  FOR  t=l  TO  2000:NEXT 

65  ON  BREAK  STOP  ■-■.-■ 

70  RETURN 

run 

COMMANDE:   Desactive  les  commandes  ON    BREAK   CONT  et   ON    BREAK 

GOSUB  pour  permettre  l'arret  du  programme  sur  activation  de  la  touche  [ESC].  Dans 
l'exemplc  ci-dessus,  la  commande  ON  BREAK  GOSUB  ne  fonctionnc  qu'une seule  fois 
car  elle  est  desactivee  a  la  ligne  65  dans  1c  sous-programme  ON  BR  EAK. 

Mots  cles  associes  :  ON  BREAK  CONT,  ON  BREAK  GOSUB 


ON  ERROR  GOTO 

ON  ERROR  GOTO  <  numero  de  ligne  > 

10  ON  ERROR  GOTO  60 

20  CLS:PRINT"Si  une  erreur  est  trouvee,  "; 

30  PRINT"alors  LISTer  le  programme" 

40  FOR  t  =  l  TO  4000J  NEXT 

50  GOTO  L00 

60  PRINT"Erreur  detectee  a  la  ligne"; 

70  PRINT  ERL: PRINTiLIST 

run 

COMMANDE :  Passe  a  la  ligne  specifiee  aussitot  qu'une  erreur  est  detectee. 

La  commande  ON  ERROR  GOTO  0  desactive  le  deroutement  du  programme  sur 
erreur  el  retablit  le  traitement  normal  des  erreurs  par  le  BASIC. 

Voir  egalement  la  commande  RESUME 

Mots  cles  associes :  DERR,  ERL  ERR,  ERROR,  RESUME 
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ON  < expression >  GOSUB 

ON  <selecteur>  GOSUB  <Iistede:<numerode  ligno 

10  PAPER  8:PEN  t: INK  0,  1 

20  CLS:PRINT"  MENU  " : PRINT 

30  PRINT" 1  -  Changer  U  cadre" : PRINT 

40  P R I N T " 2  -  Changer  le  styl o": PRINT 

50  PRINT"3  -  Changer  de  mode":PRINT 

60  INPUT  "Votre  choix"5X 

70  ON  x  BOSUB  90,110,130 

80  6DT0  20 

90  b=b-l:IF  b<0  THEN  b=26 

100  BORDER  b;RETURN 

110  p=p-l:IP  p<2  THEN  p=26 

120  INK  l,piRETURN 

130  **«ri:IF  m<0  THEN  «*2 

140  MODE  nt  RETURN  ■  ..■:■.■=;■-:-  ■  ■»•....!■■■>!>> 

run 


COMMANDE  :  Selectionne  une  ligne  de  sous-programme  en  fonction  de  la  valeur  du 
< selecteur >  (nombre  entier  compris  entre  0  et  255).  L'ordre  des  valeurs  des  < selecteurs > 
determine  le  numero  de  ligne  a  extraire  de  la  < liste  de:<numeros  de  lignes>.  Dans 
I'exemple  ci-dessus : 

1  provoque  le  passage  a  la  ligne  90, 

2  provoque  le  passage  a  la  ligne  110, 

3  provoque  le  passage  a  la  ligne  130. 

Si  cette  expression  est  egale  a  zero,  ou  si  elle  est  superieure  au  nombre  de  lignes  de  la  liste 
specifiee  dans  la  commande,  la  selection  n'a  pas  lieu. 

Mots  cles  associes  :  RETURN 
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ON  <  expression  >  GOTO 

ON  <selecteur>  GOTO  <listede:<imrnerodeligne> 

10   CLSiPRINT"  MENU  ":PRINT 

20  PRINT"!  -  LISTe  le  programme":PRINT 

30  PRINT"2  -  EDI Te  pour  corriger ": PRINT 

40  PR1NT"3  -  Fait  2e  CATalogue" :PRINT 

50  INPUT  "Votre  choix"in 

60  ON  n  GOTO  80,90, 100 

70  GOTO  10 

80  LIST 

90  AUTO 

100  CAT 

run 

COMMANDE  :  Selectionne  une  ligne  a  laquelle  le  programme  doit  sauter  en  fonction  de 
la  valeur  du  <selecteur>  (nombre  entier  compris  entre  0  et  255).  L'ordre  des  valeurs  du 
<selecteur>  determine  le  numero  de  ligne  a  extraire  de  la  <l«ste  de:  <  numeros  de  lignes> . 
Dans  Texemple  ci-dessus : 


1  provoque  le  passage  a  la  ligne  80, 

2  provoque  le  passage  a  la  ligne  90, 

3  provoque  le  passage  a  la  ligne  100. 


Si  cette  expression  est  egale  a  zero,  ou  si  elle  est  superieure  au  nombre  de  lignes  de  la  liste 

specifiee  dans  la  commande,  la  selection  n'a  pas  lieu. 

Mots  cles  associes  :  Aucun 


ON  SQ  GOSUB 

ON  SQ  <<numero  de  canal>)  GOSUB  <numero  de  1igne> 

10    ENV    1,15,-1,1 

20    ON    SQdl    GOSUB    60 

30   MODE    0: ORIGIN   0,0,200,440,100,300 

40    FOR   x  =  l    TO    13:FRAMEiM0VE    330, 200, x 

50    FILL   x:NEXT:60T0    40 

60  READ   s: IF   s=0   THEN   REST0RE:G0T0   60 

70  SOUND  1,5,25, 15, 1 

80  ON  SQU)  GOSUB  60:  RETURN 

90  DATA  50,60,90,100,35,200,24,500,0 

run 
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COMMANDE :  Provoque  un  deroutement  en  cas  de  place  dans  une  file  sonore  (Sound 
Queue).  Le  <numero  de  canal  >  est  un  nombre  en  tier  indiquant  une  des  valeurs : 

1 :  pour  canal  A 
2:  pour  canal  B 
4:  pour  canal  C 

Pour  de  plus  amples  informations  concemant  la  logique  sonore,  consultez  la  partie  2  du 
chapitre  «  A  vos  heures  de  loisir...  ». 

Mots  cles  associes  :  RETURN,  SOUND,  SQ 


OPENIN 

OPEN1N  <nomfich>  .  ..... 

10  REM  Ouvre  ft  Rscoit  le  fichier  en  provenance  de  la 

disquette 

20  OPENIN  "NDMFICH";  INPUT  #9,a,a$ 

30  CLOSE  IN; PR INT"les  2  valeurs  sont:" 

40  PRINT:PRINT  a, a* 

run 

COMMANDE :  Ouvre  un  fichier  existant  sur  la  disquette  afin  d'y  lire  des  donnees  desti- 
nees  au  programme  en  memoire.  Le  fichier  a  ouvrir  doit  etre  un  fichier  ASCII.  Cet  exem- 

ple  ne  fonctionne  que  si  vous  avez  cree  le  fichier  selon  l'exemple  de  la  commande  OPE- 
NOUT. 

Mots  cles  associes  :  CLOSEIN.  EOF 


OPENOUT 

OPENOUT  <nomfich> 

10  REM  Ouvre  et  Sort  le  fichier  sur  la  disquette 

20  INPUT  "Dornez  moi  un  noabre";a 

30  INPUT  "Donnez  raoi  un  MotB}a* 

40  OPENOUT  "NOMFICH" 

50  WRITE  »9,a,a« 

60  CLOSEDUT : PRINT"les  donnees  sont  sauvees  sur  disquette" 

run 

COMMANDE  :  Ouvre  sur  la  disquette  un  fichier  de  sortie  utilisable  par  le  programme 

en  memoire. 

Mots  cles  associes  :  CLOSEOUT 
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OR 

<argument>  OR  <argument> 

IF   "alain"   <   "bernard"   OR   "chien"    >   "chat"     THEN     PRINT 

"vrai"   ELSE   PRINT    "-faux" 
vrai 
IF   "bernard"   <    "alain"   OR   "chat"    >   "chien"     THEN     PRINT 

"vrai"    ELSE   PRINT    "faux" 

IF  "alain"  <  "bernard"  OR  "chat"  >  "chitn"  THEN  PRINT 

"vrai"  ELSE  PRINT  "faux" 
vrai 

PRINT  1  AND  1 
I 

PRINT  0  AND  0 

a  .,  - 

PRINT  1  AND  0 

1 

OPERATEUR  :  Execute  en  langage  machine  des  operations  booleennes  sur  des  entiers. 
Donne  1  dans  tous  les  cas  sauf  si  les  deux  arguments  sont  egaux  a  0.  Pour  de  plus  amples 
informations  sur  ta  logique,  consultez  la  partie  2  du  chapitre  «  A  vos  heures  de  loisir... ». 

Mots  cles  associes :  AND,  NOT,  XOR 


ORIGIN 

ORIGIN  <x>,<y>[,<gauche>,<droite>,<haut>,<bas>] 

IB    MODE    It  BORDER    I3:TAB 

20    ORIGIN   0,0,108,540,300, 100 

30  GRAPHICS  PAPER  3:CLS 

40  FOR  x=550  TO  -340  STEP  -10 

50  MOVE  x,206 

60  PRINT"Voici  une  fenetre  graphique  "; 

70  FRAME:NEXT:G0T0  40 

run 


COMMANDE :  Etablit  le  point  d'origine  du  curseur  graphique  aux  coordonnees  <x>, 
<y>  specifiees.  Vous  pouvez  egalement  fixer  les  dimensions  de  la  fenetre  graphique  par 

specification  des  quatre  dernicrs  parametres  facultatifs.  Si  les  coordonnees  specifiees  pour 
la  fenetre  graphique  se  trouvent  en  dehors  de  Pecran,  les  bords  de  Tecran  sont  alors  consi- 
deres  commc  les  limites  de  la  fenetre. 

Mots  cles  associes :  CLG 
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OUT 

OUT  <numero  du  port  > ,  <nombre  en  tier  > 

OUT  *F8F4,fcFF 

COMMANDE  :  Envoie  la  valeur  du  <nombre  entier>  (entre  0  et  255)  vers  Ie  port  de 
sortie  precise  par  son  adresse. 

A  deconseiller  aux  utilisateurs  peu  avertis. 
Mots  cles  associes :  INP,  WAIT 

PAPER  # . 

PAPER  [  jt  <mrmero  du  canal >,]<encfe> 

18  MODE  0:PEN  19:  INK  0,13 

20  FOR  p=l  TO  15 

30  PAPER  p:CLS 

40  LOCATE  7, 1 2: PR  I  NT " PAPER " ;  p 

50  FOR  t=l  TO  5001NEXT  t,p 

run 

COMMANDE :  Etablit  la  couleur  du  fond  pour  les  caracteres.  Lors  de  raffichage  des 
caracteres  sur  l'ecran,  sa  matrice  (la  grille)  est  remplie  par  P<encre>  correspondant  au 
papier  {PAPER  INK)  avant  qu'il  ne  soit  lui-meme  affiche  (sauf  en  cas  de  mode  transpa- 
rent). 

Si  ie  <numero  de  canal  >  n'est  pas  specifie,  le  canal  fl  0  est  pris  par  defaut. 
Le  nombre  de  couleurs  disponibles  depend  du  mode  choisi. 
Mots  cles  associes:  INK,  GRAPHICS  PAPER.  PEN 
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PEEK 

PEEK  (<adresse>)  ■■■•■;'■•■. 

10  MODE  Is  ZONE  7 

20  WINDOW  1 , 48, 1 , 2: WINDOW  #1,1,48,3,25 

30  PRINT"Adresse  memoire" 

40  LOCATE  20, i : PRINT "Contenu  memoire" 

50  FOR  n=0  TO  65535 

60  p=PEEK(n) 

70  PRINT  #lln>"(l<"}HEX*(n>5")"; 

80  PRINT  #l,TAB(20)jp,"<i<";HEX«(p>;")" 

99    NEXT 

run 


FONCTION :  Lit  le  contenu  de  la  case  memoire  Z80  dont  l'<adresse>  est  indiquee 
entre  les  parentheses.  Cette  adresse  doit  etre  comprise  entre  &00O0  et  &FFFF  (0  et 
65535).  PEEK  n'opere  que  sur  la  memoire  vive  (RAM),  jamais  sur  la  memoire  morte 
(ROM),  et  fournit  des  valeurs  comprises  entre  &00  et  &FF  (0  ct  255). 

Mots  cles  associes :  POKE 


PEN 

PEN  if  [  <numero  de  canal  >,][<cncre>][,<  mode  du  fond>] 

10  MODE  0:PAPER  0: INK  8,13 
20  FOR  p=l  TO  15 

30  PEN  p:PR!NT  SPACE*(47>;"PEN";p 
48  FOR  t=l  TO  500:NEXT  t,p:G0TO  20 
run 

COMMANDE :  Selectionne  1'  <encre>  a  utiliser  (de  0  a  15)  pour  ecrire  sur  le  canal  indi- 
que  (par  defaut :  #0).  Le  parametre  <mode  du  fond>  peut  etre  soit  transparent  (I),  soit 
opaque  (0). 

Au  moins  un  des  deux  derniers  parametres  doit  figurer.  Si  l'un  d'eux  est  omis,  sa  valeur 
antericure  reste  inchangee. 

Mots  cles  associes  :  PAPER 


■4 
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PI 

p|  (lov^Vtj  v  '  ■ 'it:  ■■■'.':  -  ■■"■■  ' 

PRINT  PI 
3.14159265 

FONCTION  :  Fournit  la  valeur  du  rapport  circonference-diametre  d'un  cercle. 
Mots  cles  associes :  DEG.  RAD 

PLOT 

PLOT  <coordonnee  x>,<coordonnee  y>[,[<encre>][,<mode  d'encro]] 

10  MODE  li BORDER  8:PAPER  0:PEN  1 

20  INK  0,0:  INK  1,26:  INK  2,  13,26: DE8 

30  FOR  x  =  l  TO  360: ORIQIN  320,200 

40  DRAW  50*COS(x),50tSIN(x>,  I 

50  PLOT  100*CaS(x),25*SIN(x):NEXT 

60  ORIGIN  0,0:t=TIME+700:WHILE  TIME<t 

70  PLOT  RND*640,RND*400:WEND 

80  PLOT  RNDI640,RND<400,2 

90  GOTO  90 

run 


COMM  ANDE  ;  Affiche,  en  mode  graphique,  le  point  de  coordonnees  x  et  y.  On  definit 

l*<encre>  de  ce  point  sur  une  echelle  de  0  a  15. 

Leparametre  facullatif  <  mode  d'encro  determine  le  mode  d'interaction  entre  la  couleur 

utilisee  et  celle  de  1'ecran.  Voici  les  quatre  modes  possibles : 

0  :  Normal 

1  :  XOR  (OU  exclusif) 

2  :  AND  (ET) :  OR  (OU) 


Mots  cles  associes :  GRAPHICS  PEN,  PLOTB 
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PLOTR 

PLOTB  <decalage x>,<decalage y>[,[<encre>][,<mode d'encroTJ 


18 

REr^ 

1  utilise!  1 

,e  pave  curseur  pour 

dessiner 

28 

BORDER  0:BRAPHICS  PEN  I 

3B 

MODE  liPLQT  322,280 

40 

IF 

2NKEY(0)=0 

THEN 

PLOTR 

■  ,1 

50 

IF 

INKEY ( 1 )=« 

THEN 

PLOTR 

i,0 

<Sfl 

IF 

INKEY(21*0 

THEN 

PLOTR 

0,-1 

78 

IF 

INKEY(8)*0 

THEN 

PLOTR 

-t,a 

88 

IF 

INKEY(9)=fl 

THEN 

30: REP 

t  CCOPY]- 

CLS 

90 

GOTO  40 

run 

COMM  ANDE :  En  mode  graphique,  afilche  a  l'ecran  le  point  de  coordonnees  x  et  y  rela- 
tives a  la  position  du  curseur  a  ce  moment.  On  definit  l'<encre>  de  ce  point  sur  une 

echelle  de  0  a  1 5. 

Le  parametre  facultatif  <mode  d'encro  definit  le  mode  d'interaction  entre  la  couleur 
utilisee  et  celle  de  l'ecran.  Voici  les  quatre  modes  possibles  : 

0 :  Normal 

1  :  XOR  (OU  exclusif) 

2:  AND(ET) 

3 :  OR  (OU) 

Mots  cles  associes  :  GRAPHICS  PEN,  PLOT 


POKE 

POKE  <adresse>,<nombreentier> 

10   FOR   ii  =  49152   TO  65535 
20    POKE   ft, IBB 
38  NEXT 
run 

COMMANDE  :  Inscrit  la  valeur  correspondant  au  <nombre  entier>  (compris  entre  0 
et  255)  directement  dans  la  case  de  la  memoire  vive  (RAM)  du  Z80  dont  l'<adresse> 
est  indiquee. 
Commande  a  utiliser  avec  precaution  ! 

Mots  cles  associes  :  PEEK 
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POS 

POS  (If  <  numero  de  canal  > ) 

10  MODE  Is  BORDER  BiLOCATE  8,2 

22  PRINT"utilisez  les  Heches  droi te/gauche  " 

30  WINDOW  1,40, 12, 12: CURSOR  1,1 

40  FOR  n=l  TO  19: PRINT  CHR* (9) i : NEXT 

50    IF    INKEYU)<>-1    THEN   PRINT    CHR$<9); 

60    IF    INKEY(8K>-i    THEN    PRINT    CHR$(8); 

70    LOCATE    #1,2,24 

80  PRINT  #l,"curseur  texte,"; 

90  PRINT  #1, "position  horizontale="j 

100  PRINT  #1,POS(#0)!BOTO  50 

run 

FONCTION  :  Calcule  la  POSition  du  curseur  de  texte  sur  1'axe  horizontal,  a  partir  du 
bord  gauche  de  la  fenetre.  Le  <numero  de  canal  >  doit  obligatoirement  etre  precise  ;  il  ne 

prend  pas  la  valeur  ?Q  par  defaut. 

POS{*8)  calcule  la  position  horizontale  du  chariot  de  Fimprimante  par  rapport  a  la 

marge  de  gauche  (de  coordonnee  I). 

POS(P)  calcule  la  position  logique  du  canal  d'unite  de  disquettes,  e'est-a-  dire  le  nom- 
bre  de  caracteres  transmis  depuis  lc  dernier  «  retour  chariot  ». 

Mots  cles  associes  :  VPOS,  WINDOW 


PRINT 

P  R I  NT  [If  <  numero  de  canal  > ,][  <  liste  de:  <  article  a  imprimer  >  ] 

10  aS="petite" 

20  b*="Ceci  est  une  longue  chain*  de  caracteres" 

30  PRINT  a*;a* 

40  PRINT  a*, a* 

50  PRINT 

60  PRINT  b*;b* 

70  PRINT  b*,b*  ... 

run 

COMMANDE  :  Transmet  la  > liste  de:<article  a  imprimer>  ou  a  afficher  sur  le  canal 
indique,  (i0  par  defaut). 
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Le  point-virgule  indique  a  l'ordinateur  qu'un  article  doit  etre  imprime  immediatement  a 
la  suite  du  precedent.  Toutefois.  s'il  est  trop  long  pour  tenir  sur  la  meme  ligne,  l'ordina- 
teur passe  tout  de  meme  a  la  ligne. 

La  virgule  indique  qu'un  article  doit  etre  positiorme  a  la  tabulation  suivante.  Toutefois, 
si  1'impression  ou  1'affichage  de  l'article  precedent  deborde  sur  la  tabulation  indiquee, 
l'ordinateur  decale  le  nouvel  article  d'une  tabulation  supplementaire. 


PRINT  SPC 
PRINT  TAB 

PRINT  [* < numero  de  canal> ,][< liste  de: < article  a  imprimer >][;] 
[SPC  (<nombre  entier>)][< liste  de:  < article  a  imprimer >] 

P  R I  NT  [it  <  numero  de  canal  > ,][  <  liste  de:  <  article  a  imprimer>  ][;] 
[TAB  (<nombre  entier>)][< liste  de:<article  a  imprimer>} 

10  PRINT"ceci  est  1' instruction  SPC" 

20  FOR  k=6  TO  15 

30  PRINT  SPCt5)"a"jSPCU);"b" 

40  NEXT 

50  PRINT"ceci  est  1'instruction  TAB" 

60  FOR  k=6  TQ  15 

70  PRINT  TAB(5)"an5TAB<x);"b" 

B0  NEXT 

run 

SPC  menage  le  nombre  d'espaees  vides  indique  par  le  <nombre  entier>  avant  d'impri- 
mer  ou  d'afficher  l'article  indique.  a  condition  que  ce  dernier  tienne  integralement  sur  la 
ligne.  Tl  est  done  inutile  d'utiliser  le  point-virgule  avee  la  commande  SPC. 

TAB  menage,  a  partir  de  la  marge  de  gauche,  le  nombre  d'espaees  vides  indique  avant 
d'imprimer  ou  d'afficher  l'article  designc.  a  condition  que  cc  dernier  tienne  sur  la  ligne. 
Le  point-virgule  est  done  inutile  apres  TAB.  Si  le  curseur  a  deja  depasse  la  position 
demandee,  un  changement  de  ligne  est  effectue  avant  la  tabulation. 
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PRINT  USING 

PRINT  [v  <numero  de  canal >][<liste  de:< article  a  imprimer>][;] 
[USiNG<modelede  format  >][<separateur>  < expression  >] 

10  FOR  x  =  l  TO  10 

20  n=100B00*(RNDt5) 

30  PRINT"marchdndi5e";USING  "##*#»»#*, *#" } n 

40  NEXT 
run 

PRINT  USING  permet  de  definir  le  format  depression  ou  d'affichage  d'une  expression 
transmise  par  la  commande  PRINT.  On  definit  pour  cela  le  <modele  de  format >  sous 
leuuel  on  desire  voir  apparaitre  1'expression.  On  utilise  comme  <separateur>  soit  une 
virgule,  soil  un  point-virgule.  Le  <modele  de  format >  est  une  chaine  de  caracteres  com- 
poses des  « indicateurs  de  champ  »  suivants : 


Formats  numeriques 

Dans  un  nombre : 

§       Chaque  signe  ?  indique  1'emplacement  d*un  chiffre. 

Exemple :  H##M# 

Indique  1'emplacement  du  point  decimal  (equivalent  a  notre  virgule). 
Exemple :  #§W#M 

(Reserve  un  espace).  Ce  signe.  ne  pouvant  figurer  qu'immediatement  avant  le  point 
decimal,  indique  que  les  chiffres  situes  a  gauche  du  point  decimal  seront  disposes 
par  groupes  de  trois  (correspondant  aux  milliers)  separes  entre  eux  par  une  virgule. 
Exemple  :  $§#!?##.•#*> 

Encadrement  d'un  nombre : 

££     (Reserve  deux  espaces).  Indique  que  le  signe  £  apparaitra  immediatement  avant  le 
premier  chiffre  ou  le  point  decimal,  e'est-a-dire  sur  1'un  des  emplacements  reserves 
aux  chiffres. 
Exemple  :  t£.MW$-M 

"      (Reserve  deux  espaces).  Indique  que  tous  les  espaces  vides  situes  avant  le  nombre 

seront  combles  par  les  asterisques. 
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**£  { Reserve  trois  espaces).  Additionne  les  options  **  et  ££,  c'est-a-dire  les  asteris- 

qucs  en  tete  et  Ic  signe  £  precedant  immediatement  le  nombre. 
Exemple  :  **inv H9$H,; Hi- 

$$  (Reserve  deux  espaces).  Indique  que  le  signe  $  apparaitra  immediatement 

a  gauche  du  premier  chiffre  ou  du  point  decimal,  c'est-a-dire  sur  l'un  des 
emplacements  reserves  aux  chiffres. 

Exemple  :  $$######,.## 

**$  ( Reserve  trois  espaces).  Additionne  les  options  *  *  et  $$,  c'est-a-dire  les  aste- 

risques  en  tete  et  le  signe  $  precedant  immediatement  le  nombre. 
Exemple :  **$#M###..## 


+ 


Indique  qu'on  desire  voir  figurcr  le  signe  du  nombre.  Ce  signe  apparaitra 
avant  le  nombre  si  1c  +  est  situc  au  debut  du  <modcle  de  format >  et  apres 
le  nombre  s'i!  est  situe  a  la  fin. 
Exemple  :  +  tfjfttjt.  £### 

Le  signe  -  ne  peut  figurer  qu'A  LA  FIN  du  masque.  II  demande  la  presence 
du  signe  -  apres  tout  nombre  ou  tout  exposant  negatifs.  En  I'absence  de 
cette  specification,  le  signe  -  apparait  par  defaut  avant  le  nombre  negatif. 
Exemple  :  fjffM-i 


TTTT  Indique  que  le  nombre  doit  apparaitre  en  exposant.  Les  signes  TTTT  se  pla- 

cent  APRES  le  dernier  emplacement  des  chiffres,  mais  AVANT  tout  signe 
+  ou  -  final. 

Exemple :  4'.#./j'##HTT  + 

La  longueur  maximale  du  <modeIe  de  format >  d'un  nombre  est  de  20  caracteres.  Les 

nombres  sonl  arrondis  au  nombre  de  signes  indique. 

Si  un  format  est  trop  petit  pour  contenir  l'expression  saisie : 
PRINT   USIN6    "####") 12345678 

...celle-ci  n'est  pas  tronquee,  mais  apparait  dans  son  integralite,  precedee  du  signe  %  indi- 
quant  un  «  format  errone  ». 
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Format  (Tune  chalne  alphanumerique 

10  CLSja$="abcde-fqhijklfflnQpqrst" 

20  PRINT"chaine  alphanum. =  ";a* 

313  PRINT:PRINT"Avec    !    =    "i 

40  PRINT  US  INS  "  !";a* 

50  PRINTiPRINT  "Avec  \espaces\  = 

60  PRINT  USING  "\       \";a* 

70  PRINTiPRINT  "Avec  S<  =  "; 

80  PRINT  USING  "&"sa* 

98  SOTO  90 

run 


!        Indique  que  seul  le  premier  caractere  de  la  chaine  doit  apparaitre. 
Exemple : ! 

\<e$paces>  \  ...  %         ■*    + 

Indique  que  seuls  les  x  premiers  caracteres  de  la  chame  doivent  apparaitre,  x  etant 

egal  a  la  longueur  du  format  (barres  comprises). 

Exemple :  \  \ 

&      Indique  que  la  chaine  doit  apparaitre  « telle  quelle  ». 
Exemple ;  & 

Le  <modele  de  format  >  d'une  chaine  ne  peut  exceder  255  caracteres. 

Tout  <modele  de  format  >  peut  etre  represent  par  une  variable  alphanumerique,  comme 

le  montre  l'exemple  suivant : 

10  a**"FF«##*M,.*#" 

20  b*="!" 

30  PRINT  USING  a*;  12345. 6789; 

40  PRINT  USING  bS; "centimes" 

run 

Pour  plus  de  details  concernant  les  formats,  voir  la  deuxieme  partie  du  chapitre  intitule 
«  A  vos  heures  de  loisir...  ». 

Mots  cles  assocics  :  SPC,  TAB,  USING,  ZONE 
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RAD 

RAD 

RAD 

COMMANDE :  Etablit  le  mode  de  calcul  en  RADians.  En  BASIC,  il  est  adopte  par 
defaut. 

Mots  cles  associes:  ATN,  COS,  DEG,  SIN,  TAN 


RANDOMIZE 

RANDOMIZE  [<expression  numeriquo] 

RANDOMIZE  123.456 
PRINT  RND 
0.256852139 

COMMANDE :  Donne  une.  valeur  aleatoire  calculee  a  partir  de  l'<expression  numeri- 
quo indiquee.  Le  generateur  de  nombres  aleatoires  fournit  une  sequence  pseudo- 
aleatoire  dans  laquelle  chaque  nombre  depend  du  precedent.  La  sequence  elle-meme  est 
predeterminee.  Si  la  valeur  initiale  n'est  pas  precisee  dans  la  commande,  c'est  l'utilisateur 
qui  I'entrera  en  cours  d'execution.  RANDOMIZE  TIME  fournit  une  sequence  prati- 
quement  imprevisible. 

Mots  cles  associes  :  RND 


READ 

READ  <liste de:< variable > 

10  FOR  n=l  TO  8 

20  READ  a*,c 

38  PRINT  a*;"  "; ; SOUND  1,ciNEXT 

48  DATA  voici>478,les,42i,B,379,notB5 

50  DATA  358,de,3l9,li,2B4,ganM(253,.l239 

run 

COMMANDE :  Lit  les  donnees  contenues  dans  une  instruction  DATA  et  les  assigne  a 
des  variables.  READ  passe  automatiquement  d'une  donnee  a  la  suivante.  La  commande 
RESTORE  permet  de  revenir  a  une  commande  DATA  anterieure. 

Pour  plus  de  details,  voir  la  deuxieme  partie  du  chapitre  intitule  «  A  vos  heures  de 
loisir...  ». 

Mots  cles  associes  :  DATA,  R  ESTO  R  E 
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RELEASE 

RELEASE  <canaux  sonores>  ;■■■■ 

10  SOUND  65, 1000, 180 

20   PRINT"appuyez    CR]    pour    liberffr    la   note" 

30    IF    INK£Y(50)*~1    THEN    30 

40    RELEASE    1 

run 

COMMANDE  :  Libere  lcs  canaux  sonores  bloques  par  la  commande  SOUND. 

Le  parametre  < canaux  sonores >  prend  les  valeurs  suivantes : 

1  :  Libere  le  canat  A 

2 :  Libere  le  canal  B 

3  :  Libere  les  canaux  A  et  B 

4 :  Libere  le  canal  C 

5 :  Libere  les  canaux  A  et  C 

6 :  Libere  les  canaux  B  et  C 

7  :  Libere  les  canaux  A,  B  et  C 

Pour  en  savoir  plus  sur  le  mode  sonore,  consultez  la  deuxieme  partie  du  chapitre  intitule : 
«  A  vos  heures  de  loisir...  ». 

Mots  cles  associes :  SOUND 

REM 

REM  <texte> 

10  REM  CHASSE  AUX  ENVAH1SSEURS  DANS  L' HYPERESPACE 

INTERGALACT1QUE 

20  REM        CQPYRI6HT  by  AMSQFT 

COMMANDE  ;  Insere  une  REMarque  dans  le  programme.  BASIC  ne  tient  pas  compte 
du  <texte>  situe  sur  la  ligne  a  droite  de  REM,  meme  si  celui-ci  comprend  un  separateur 
d'instructions  "  :  "  ou  tout  autre  code. 

On  peut  remplacer  :REM  par  une  apostrophe  '  dans  tous  les  cas,  SAUF  a  l'interieur 
d'une  instruction  DATA. 

Mots  cles  associes  :  Aucun 
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REMAIN 

R EM Al  N  ( <  numero  de  chronometre > )  "rtnw*  *v< 

10  AFTER    520, 1    GOSUB    40 

20  AFTER    100,2   GOSUB   50 

30  PRINT"l_e  programme   tourne":QQTO  30 

40  REM  ce  sous   programme  ne   sera  plus  appele  dans   la  mesure 

ou  il    a  ete   rendu    innoperant    en    ligne  78 

50  PRINT: PRINT    "Le   chronometre    1    va    "; 

60  PRINT"etre    supprime  par    REMAIN." 

70  PRINT"il    re5tait";REMAlNU>;"unites  de  temp*  au  chrono   1 

run 


FONCTION  :  Lit  le  temps  restant  a  decompter  par  le  chronometre  indique  (de  0  a  3), 
avant  de  le  desactiver.  Pour  plus  de  details  concernant  les  interruptions,  consultez  la 
deuxieme  partie  du  chapitre  «  A  vos  heures  de  loisir...  ». 

Mots  cles  associes  :  AFTER,  Dl,  El,  EVERY 


RENUM 

RENUM  [<nouveau  numero  de  ligne>][,[<ancien  numero  de  ligne>][,<  increment >]] 

10  CIS 

20  REM  cette  ligne  deviendrajl  igne  123 

30  REM  cette  ligne  deviendra: ligne  124 

48  REM  cette  ligne  deviendras ligne  125 

RENUM  123,20,1 

LIST 

COMMANDE  :  RENUMerote  les  Iignes  d'un  programme. 

L'oncien  numero  de  ligne  >  est  un  parametre  indiquant  la  ligne  du  programme  a 
laquetle  on  desire  commencer  la  renumerotation.  En  l'absencedece  parametre,  toutes  les 
Iignes  du  programme  seront  renumerotees.  Le  <nouveau  numero  de  ligne  >  indique  le 
nouveau  numero  de  la  premiere  ligne  renumerotee  (1 0  pardefaut).  L'<increment>  indi- 
que I'espacement  desire  entre  deux  Iignes  (10  par  defaut).  RENUM  opere  les  reajuste- 
ments  neccssaires  a  I'intericur  des  instructions  d'appel  telles  que  GOTO  et  GOSUB.  En 
revanche,  il  laisse  inchange  les  numeros  de  Iignes  contenus  dans  des  chaines  dc  caracteres 
apparaissant  dans  les  commandes  KEY,  REM,  CHAIN  et  CHAIN  MERGE.  Les  nume- 
ros de  Iignes  doivent  etre  compris  entre  1  et  65535. 

Mots  cles  associes :  DELETE,  LIST 
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RESTORE 

RESTORE  [<numerodeligne>]  ,,,-;. -*,:. ...... 

10  READ  aliPRINT  a»j"  "j 

20  RESTORE  50 

30  FOR  t*l  TO  508:NEXTsGOTQ  10 

40  DATA  les  data  recuperes  peuvent  etre  lus  encore 

50  DATA  et  encore 
run 

COMMANDE  :  Ramene  le  pointeur  sur  l'instruction  DATA  indiquee.  En  1'absence  de 
parametre,  le  pointeur  retourne  a  la  premiere  instruction  DATA  du  programme. 

Pour  plus  de  details,  consultez  la  deuxieme  partie  du  chapitre  «  A  vos  heures  de  loisir... ». 
Mots  cles  associes  :  DATA,  READ 

RESUME 

RESUME  [<numero  de  Iigne>] 

10  ON  ERROR  GOTO  60 

20  FOR  x=10  TO  0  BTEP-1: PRINT  l/x:NEXT 

30  END  „.-:  .  ■■  ; 

40  PRINTHje  viens  ici  en  cas  d'erreur" 

50  END 

60  PRINT"erreur  No."sERR!"a  la  ligne";ERL 

70  RESUME  40 

run 

COMMANDE  ;  Reprend  1'execution  d'un  programme  apres  la  detection  et  le  traitement 
d'une  erreur  par  la  commande  ON  ERROR  GOTO.  Si  aucun  <numero  de  ligne>  n'est 

indique,  I'execution  du  programme  reprend  a  la  ligne  contenant  l'erreur  detectee.  Suppri- 
mez  ce  parametre  dans  Texemple  ci-dessus,  puis  faites  tourner  le  programme. 

70   RESUME 
run 

Mots  cles  associes :  DERLERL.  ERR,  ERROR, 
ON  ERROR  GOTO, 
RESUME  NEXT 
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RESUME  NEXT 

RESUME  NEXT  ■ » r  0 

10  ON  ERROR  SOTO  90 

20  PRINT"tapez  [ENTER]  a  chaque  fois" 

30  INPUT  "i";a 

40  INPUT  " 2 "  j  a 

50  inpot  "3" ;  as  REM  erraur  da  syntaxe 

60  INPUT  "4"}a 

70  INPUT  "5"ja 

80  END 

90  PRINT"erreur  Na.";ERR;"a  la  liqne";ERL 

100  RESUME  NEXT 

run 


COMMANDE  :  Reprend  Pexecution  dun  programme  apres  la  detection  et  le  traitement 
d'une  erreur  par  la  cornmande  ON  ERROR  GOTO. 

L'execution  du  programme  reprend  a  partir  de  la  ligne  suivant  immediatement  la  ligne 
erronee. 

Mots  cles  associes :  DERR,  ERR,  ERROR,  ON  ERROR  GOTO,  RESUME 


RETURN 

RETURN 

10  GOSUB  50:PRINT  "Apres  le  60SU6":END 

50  FQR  n=l  TO  20 

60  PRINT"sous-program(B«" 

70-NEXT:PRINT 

80  RETURN 

run 

COMMANDE  :  Indique  la  fin  d'un  sous-programme.  Apres  Pexecution  d'un  sous-pro- 
gramme, BASIC  retourne  a  Pinstruction  suivant  immediatement  Pappel  GOSUB  corres- 
pondant. 

Mots  cles  associes  :  GOSUB 
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vpvW'yf*  *v 


'    RIGHTS 

RIG  HT$  {<chaine  alphanumeriquo  ,<  longueur  reqttisfcx)  ■■"•'■ 

10   MODE    i!a*="ordinateur    CPC   6128" 
20   FOR   n=l    TO    16sL0CATE   41-n,n 
30    PRINT    RI6HT*(a$,n) 
40    NEXT 
run 

FONCTION  :  Extrait  un  certain  nombre  de  caracteres  (entre  0  et  255)  a  gauche  d'une 
<chalne  alphanumerique> .  Si  la  chaine  est  plus  courte  que  la  <  longueur  requise>,  elle 
est  utilisee  entierement. 

Mots  cles  associes :  LEFT$.  MID$ 

yi  !/■ 

RND 

R  N  D  (( <  expression  numerique  > )] 

10  RANDOMIZE 

20  FOR  x=l  TO  -i  STEP  -1 

30  PRINT"para*etre  RND="zx 

40  FOR  n=l  TO  6 

50  PRINT  RND(x) 

60  NEXT  n,x 

run 

FONCTION  :  Foumit  le  prochain  nombre  de  la  sequence  pseudo  aleatoire  en  cours  lor- 
que  r<expression  numerique >  est  positive  ou  lorsqu'elle  ne  figure  pas  dans  la  com- 
mande. 

Lorsque  l'< expression  numerique >  est  nulle.  RND  renvoie  le  dernier  nombre  genere. 

Une  valeur  negative  de  l'<  expression  numerique  >  lance  une  nouvelle  sequence  aleatoire, 

dont  RND  foumit  le  premier  element. 

Mots  cies  associes  :  RANDOMIZE 


-'AOO 
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ROUND 

ROUND  (<expression  numeriqlae^k^TSdHfbre  de  decimales>] ) 

10  FOR  n=4  TO  -4  STEP  -1 

20  PRINT  R0UNDU234.567B,fi), 

30  PRINT  "arrondi  a";n| "deciinales" 

40  NEXT 
run 

FONCTION  :  Arrondit  I'<  expression  numeriquo  au  nombre  de  chiffres  apres  la  yir- 
gule  ou  de  puissances  de  dix  indique  par  le  parametre  <  nombre  de  decimales  >.  Si  ce 
parametre  est  negatif,  l'expression  est  arrondie  a  un  entier  absolu,  suivi  d'un  nombre  de 
zeros  egal  a  sa  valeur  absolue. 

Mots  cles  associes  :  ABS,  CiNT,  FIX,  INT 


RUN 

RUN  <chainealphanumerique> 
RUN  "disc" 

COMMANDE :  Charge  et  execute  un  programme  BASIC  ou  un  programme-objet  situe 
sur  la  disquette.  Tout  programme  deja  present  en  memoire  est  automatiquement  ecrase. 

Cette  commande  permet  d'acceder  directement  aux  programmes  BASIC  proteges. 

Mots  cles  associes :  LOAD 

RUN 

RUN  [<numerodeligne>] 

RUN  280 

COMMANDE  :  Execute  le  programme  BASIC  present  en  memoire,  en  commencant  au 
<numero  de  ligne>  indique  ou,  a  defaut,  au  debut  du  programme.  RUN  reinitialise  tou- 
tes  les  variables. 

Cette  commande  peut  ne  pas  donner  acces  aux  programmes  proteges  charges  en 

memoire. 

Mots  cles  associes  :  CONT,  EN  D,  STOP 
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SAVE 

SAVE  < nomfich > [, < type  de  fichier  >][,<parametres  binaires>)      -.-fij^jv 

SAVE   "Hchdisc.xyz" 
...sauvegarde  le  fichier  en  mode  BASIC  non  protege. 

SAVE   "fichdisc,xyz")P 
...sauvegarde  le  fichier  en  mode  BASIC  Protege. 

SAVE   "f ichdisc.xyz", A 
...sauvegarde  fe  fichier  en  mode  ASCII. 

SAVE    "fichdisc.xyz"fB, 8088,3800, 8881 


rm 


...sauvegarde  le  fichier  en  mode  Binaire.  Dans  notre  exemple,  le  programme  sera  stocke 
en  memoire  a  partir  de  Padresse  8000  et  occupera  3000  octets.  L'adresse  (facultative) 
du  point  d'entree  est  8001 . 

COMMANDE:  Sauvegarde  sur  disquette  le  programme  se  trouvant  actuellement  en 
memoire.  Une  zone  memoire  chargee  sur  disquette  s'appelle  un  fichier  Binaire.  Voici 
quels  sont  les  differents  parametres  Binaires : 

<adresse  du  debut >,<taille  du  fichier>[,< point  d'entreo] 

II  est  possible  de  sauvegarder  la  memoire  d'ecran  sous  forme  de  fichier  Binaire.  Cette 
operation,  appelce  «  vidage  d'ecran  »,  s'effectue  au  moyen  de  la  commande  suivante : 

SAVE   "ecran", 8,^0000,^4888 

On  obtient  ensuite  son  rechargement  a  I'ecran  en  entrant  la  commande : 
LOAD   "ecran" 

Mots  cles  associes :  CHAIN,  CHAIN  MERGE,  LOAD,  MERGE,  RUN 


*«*•#*!■!■   "I 
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SGN 

SGN  (< expression  numeriquo)  :'"?^>  :'     "-^  if:-~!j  >'  ■" 

10   FOR   n  =  2B0   TO   -208  STEP  -20 

20  PRINT"  SGN  renvoi"! 

30  PRINT  SGN<n) ;  "pour  un*  valeur  det " ;n 

40  NEXT 
run 

FONCTION:   Etablit  le  SiGNe  de  P  expression  numeriquo.  SGN  renvoie  les 
valeurs  :  -1  {si  l'expression  est  negative),  0  (si  elle  est  nulle)  et  1  (si  elle  est  positive). 

Mots  cles  associes  :  ABS 

SIN 

SIN  (<expression  numerique>) 

10  CLStDEGrORIGIN  0,200  -^.\k« 

20  FOR  n=0  TO  720 

30  y=SIN(n) 

40  PLOT  n*640/720,198tyjNEXT' 

50  GOTO  50 

run 

FONCTION  :  Calcule  le  SINus  de  i'< expression  numeriquo  indiquee. 

On  peut  exprimer  1'argument  en  degres  ou  en  radians  en  utilisant,  respectivement,  les 
fonctions  DEG  et  RAD. 

Mots  cles  associes  :  ATN,  COS,  DEG,  RAD,  TAN 
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SOUND 

SOUND  <etat  de  canal >,<  periode  sonore  >[,<  duree  >[,< volume >[,<enveloppe  de 

volume >[,< en veioppe  de  tonalite  >[,<  periode  du  bruit  >]]]]] 

10  FOR  z  =  0  TO  4095 
20  SOUND  1,2,  1, 12 
30  NEXT 
run 

COMMANDE :  Permet  la  programmation  d'un  son,  4 1'aide  des  parametres  suivants : 


Parametre  1 :  <etat  de  canal  > 

L'<etat  de  canal  >  admet  pour  valeur  des  entiers  compris  entre  1  et  255.  La  conversion 

en  binaire  de  ce  parametre  donne  la  signification  de  chaque  bit.  selon  la  table  de  corres- 
pondance  suivante : 

Bit  0  (1  en  decimale) :  sortir  le  son  sur  le  canal  A  (Bit  de  poids  faible) 

Bit  1  (2  en  decimale)  :  sortir  le  son  sur  le  canal  B 

Bit  2  (4  en  decimale) :  sortir  le  son  sur  le  canal  C 

Bit  3  (8  en  decimale) :  rendez-vous  avec  le  canal  A 

Bit  4  (16  en  decimale) :  rendez-vous  avec  le  canal  B 

Bit  5  (32  en  decimale) :  rendez-vous  avec  le  canal  C 

Bit  6  (64  en  decimale) :  bloquer  un  canal  sonore 

Bit  7  (128  en  decimale) :  vider  un  canal  sonore  (Bit  de  poids  fort) 

L'<etat  de  canal  >  68,  par  exemple,  aura  l'effet  suivant : 

Sortie  sur  1c  canal  C  (4),  a  I'etat  bloque  (64). 


Parametre  2 :  <  periode  sonore  > 

Ce  parametre  etablit  la  hauteur  du  son,  e'est-a-dire  la  «  note  »  produite  (par  exemple  Do, 
Re,  Mi,  Fa,  Sol).  Chaque  note  se  definit  par  une  valeur  numerique  representant  sa 

<  periode  sonore  >  (Voir  le  chapitre  «  Pour  information...  ». 


Parametre  3 :  <  duree  > 

Ce  parametre  etablit  la  longueur,  ou  «  duree  »,  du  son.  1  unite  correspond  a  un  centieme 
de  seconde.  La  < duree >  du  son  prend  par  defaut  la  valeur  20,  e'est-a-dire  un  cinquieme 

de  seconde. 
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En  cas  de  parametre  de  <duree>  nul,  la  longueur  du  son  sera  celle  de  1'enveloppe  de 
volume  indiquee. 

Si  le  parametre  de  <duree>  est  negatif,  1'enveloppe  de  volume  sera  repetee  pendant  un 
nombre  dc  fois  egal  a  la  valeur  absolue  du  parametre. 

Parametre  4 :  <volu me > 

Ce  parametre  etablit  le  volume  sonore  initial  d'une  note.  11  peut  prendre  une  valeur  entre 
0  (volume  nul)  et  15  (volume  maximal).  L'ordinateur  choisit  par  defaut  la  valeur  12. 

Parametre  5  :  <enveloppe  de  volume> 

II  est  possible  de  moduler  le  volume  d'une  note  durant  son  execution  a  1'aide  de  la  com- 
mande  ENV.  Cette  commande  vous  permet  de  definir  a  I'avance  un  maximum  de  quinze 
enveloppes  differentes,  codees  de  1  a  15.  Le  parametre  <enveloppe  dc  volume >  de  la 
commande  SOUND  permet  ensuite  de  selectionner  une  de  ces  enveloppes  predefmies. 

Voir  la  commande  ENV 

Parametre  6  :  <enveloppe  de  tona!ite> 

Des  variations  de  periode,  done  de  hauteur,  peuvent  etre  oblenues  durant  1'execution 
d'une  note  par  1'intermediaire  de  la  commande  ENT.  Cette  commande  vous  permet  de 
definir  a  I'avance  un  maximum  de  15  enveloppes  de  tonalite  differentes,  codees  de  1  a 
15.  Le  parametre  <enveloppe  de  tonalite >  de  la  commande  SOUND  permet  ensuite  de 
selectionner  une  de  ces  enveloppes  predefmies.  Si,  dans  la  commande  ENT,  vous  avez 
utilise  un  numero  d'cnveloppe  negatif,  la  valeur  absolue  de  ce  nombre  devra  alors  etre 
prise  comme  parametre  de  la  commande  SOUND, 

Voir  la  commande  ENT. 

Parametre  7  :  <  periode  de  bruit > 

Vous  disposez  d'un  choix  dc  bruits  Wanes  pouvant  etre  ajoutes  ou  supprimes  du  signal 
sonore  a  I'aide  du  parametre  < periode  du  bruit >  (valeur  comprise  entre  0  et  31). 

Pour  en  savoir  plus  sur  le  mode  sonore,  lire  la  deuxieme  partie  du  chapitre  intitule  «  A 
vos  heures  de  loisir...  » 


Mots  cles  associes  :  ENT,  ENV,  ON  SQ  GOSUB,  RELEASE,  SQ 


Chapitre  3    Page  74  M6*>fcM*  du  BASIC 


SPACES 

SPACE$(<nombfeentier>)    ■   ■ri--r^- ■;."«•  ;!"     -:::---:        i  ;;!tn:- i    ■ 

18  MODE  1 

20  PRINT"met  9  espaces  intra  vous"! 

30  PRINT  SPACE$<9) j 
40  PR!NT"et  inoi  !  " 
run 

FONCTION  :  Cree  une  chaine  d'espaces  de  la  longueur  indiquee  (de  0  a  255) 
Motscles  associes  :  SPC,  STRING$,  TAB 

SPC 

(Voir  PRINT  SPC) 

SPEED  INK 

SPEED  INK  <periode  !>,<periode  2> 

10  BORDER  7,18 

28  FOR  i  =30  TO  i  STEP  -1 

30  SPEED  INK  i,i 

40  FOR  t=l  TO  700:NEXT  t,i 

run 

COMMANDE  :  Permet  d'etablir  la  periode  d'alternance  lorsqu'une  instruction  INK  ou 
BORDER  present  Tutilisation  de  deux  couleurs  intermittentes.  Les  durees  respectives 
d'utilisation  de  la  premiere  et  de  la  seconde  couleur  sont  indiquees  en  cinquantiemes  de 

secondes  par  les  parametrcs  <  periode  !  >  ct  <  periode  2>. 

Lors  du  choix  des  parametres.  penscz  aux  risques  d'effets  secondaires  hypnotiques ! 
Mots  cles  associes  :  BORDER,  INK 
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SPEEDKEY  t< 

SPEED  KEY  <delai  initial >,<intervalle  inter- repetitions > '■■'■'  ■:-'■'''■ 

13  CLSiFOR  K=7  TO  i  STEP  -2 

20  PRINT"Entrez  votre  r>om  , puis  [RETURN]" 

30  SPEED  KEY  k,k 

40  LINE  INPUT  a*sNEXT 

50  PRINT"quel  drale  de  nam  !" 

run 

COMMANDE  :  Etablit  la  vitesse  de  repetition  automatique  du  clavier.  Le  parametre 
<delai  initial  >  fixe  le  temps  de  reaction  (mesure  en  cinquanticmes  de  sccondes)  entre  Ten- 
foncement  de  la  touche  et  le  debut  de  la  repetition  automatique.  L'<intervalle  inter-repe- 
titions >  etablit  le  laps  de  temps  separant  les  repetitions. 

La  commande  SPEED  KEY  ne  concerne  que  les  touches  pour  lesquelles  la  repetition 
automatique  existe  implicitement  ou  celles  pour  lesquelles  cette  fonction  a  ete  program- 

mee  au  moyen  de  la  commande  KEY  DEF. 

Avant  de  definir  une  repetition  automatique  a  tres  faible  <delai  initial  >,  il  est  prudent 
de  programmer  une  des  touches  numeriques  afin  de  pouvoir  retablir  les  parametres  par 
defaut  de  la  fonction  SPEED  KEY  (30,2).  Voici  comment  proceder : 

KEY   0, "SPEED    KEY    30,  2"+CHR*  U3) 

II  suffira,  pour  revenir  a  Tetat  initial,  d'actionner  la  touche  0  du  pave  numerique. 

Mots  cles  associes :  KEY  DEF 

SPEED  WRITE 

SPEED  WRITE  <nombre  entier> 
SPEED   WRITE    I 

COMMANDE  :  Indique  la  vitesse  dc  transmission  des  donnecs  de  l'ordinateur  vers  un 
lecteur  de  cassettes,  1c  cas  echcant.  Cette  vitesse  est  soit  de  2000  bauds  (bits  par  seconde) 
si  ic  parametre  est  egal  a  I,  soit.  par  defaut,  de  1000  bauds  si  celui-ci  est  egal  a  0.  Lors  du 
chargement  d'un  fichier  enregistre  sur  cassette,  l'ordinateur  choisit  automatiquement  la 
bonne  vitesse  de  lecture. 

SPEED  WRITE  0  est  le  debit  assurant  la  meilleurc  fiabilite  de  transfert. 

La  commande  SPEED  WRITE  ne  s'applique  pas  aux  unites  de  disquettes. 

Mots  cles  associes  :  OPENOUT,  SAVE 


Chapitre  3    Page  76  Mots  cles  du  BASIC 


SQ 

SQ  ( <  numero  de  canal  > ) 

10    SOUND   65,100,100  •■*■.. 

20   PRINT    SQ(1)  -«ft-.«itt*!!  • 

run 
67  ..-■-. 

FONCTION  :  Indique  I'etat  de  la  file  d'attente  (Sound  Queue)  dans  un  canal  sonore 
donne.  Le  <numcro  de  canal >  doit  ctre  une  expression  numerique  entiere  prenant  les 

valeurs : 

1 :  canal  A 
2  :  canal  B 
4 :  canal  C 

Cette  fonction  fournit  un  entier  correspondant  aux  bits  de  signification  suivants : 

Bits  0,  1  et  2  :  nombres  d'entrees  libres  dans  la  file 
Bits  3,  4  et  5  :  etat  du  rendez-vous  au  debut  de  la  file 
Bit  6    :  la  tete  de  la  file  est  bloquee 
Bit  7    :  le  canal  est  en  activite 

...  oti  le  Bit  0  represente  le  bit  de  poids  faible,  et  le  Bit  7  celui  de  poids  fort. 

On  peut  constaler  que  si  le  Bit  6  est  a  1,  le  Bit  7  ne  peut  pas  I'etre.  De  meme  si  les  Bits  3, 
4  ou  5  sont  a  1,  les  Bits  6  et  7  ne  peuvent  pas  I'etre. 

Pour  plus  de  details,  voir  la  deuxieme  par  tie  du  chapitre  intitule  «  A  vos  heures  de 
loisir... » 

Motscles  associes  :  ON  SQ  GOSUB,  SOUND 


SQR 

SQR  (<  expression  numerique  >) 

PRINT    SQR(9) 

T 
■i 

FONCTION  :  Fournit  la  racine  carree  (SQuare  Root)  de  l'expression  numerique  indi- 
quee. 

Mots  cles  associes  :  Aucun 
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STEP 

(voir  FOR) 

STOP 


STOP 


10  FOR  n»l  TO  38:PRINT  n:NEXT 

20  STOP 

30  FOR  n»31  TO  MsPRINT  n;NEXT 

run 

cont 


COMMANDE  :  Interrompt  un  programme,  tout  en  laissant  a  I'utttaateur  la  poss.bilite 
d'en  reprendre  I'execution  au  moyen  de  la  commande  CONT.  STOP  ;  permet  ainsi  d  nv 
terrompre  un  programme  a  un  endroit  donne  afin  d'effectuer  une  mise  au  point. 

Mots  cles  associes :  CONT,  END 

STR$ 

STR$  ( < expression  numerique > ) 

IB  a=ScFFiR£M  255  hexad«ciMl 
20   b»4tX  1 1 1 1  s  REM    15   binaire 

38  c*="**t" 

40  PRINT  c*+STRtU  +  b)+c* 

run 

tit  270*1* 

FONCTION  :  Fournit  sous  forme  de  chaine  alphanumerique  la  representation  decimale 
de  1*< expression  numerique >  indiquee.: 

Mots  cles  associes  :  BIN$,  DECS,  HEX$,  VAL 
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STRINGS 

STRINGS  (< longueur >,<  caractere  >) 
PRINT    STRING$(40,"I"> 

t  m»s  ti*m  tt  smmttttftfttmtf  mm 

FONCTION  :  Fournit  une  chaine  de  caracteres  de  la  longueur  indiquee  (entre  0  et  255) 
constitute  par  la  repetition  d'un  meme  caractere.  L'exemple  ci-dessus  peut  egalement 


s  ecnrc  : 


PRINT  STRING*  t40, 42) 

iiiiiitiitiitiuititliiiiiiiiitiiitiiiii 

...ou  le  <caractcre>  42  correspond  a  la  valeur  en  code  ASCII  du  caractere  «  *  ».  Cette 
notation  equivaut  done  a  PRINT  STRING$(40,CHR$(42)). 

Mots  cles  associes  :  SPACES 


SWAP    ■ 

(voir  WINDOW  SWAP) 

SYMBOL 

SYM  BOL  <numero  de  caractere  >,<liste  de:<ligne> 

10  MODE  1: SYMBOL  AFTER  105 

20  rangeel=255;REM  11111111  en  binaire 

30  rangee2=l29:REN  10000001  an  binaire 

48  rangee3=189:REM  10111101  en  binaire 

50  rangee4=i53;REI1  10011001  en  binaire 

60  rangee5=153:REM  10011001  en  binaire 

70  rangee6=189:REM  10111101  en  binaire 

60  rangee7=i29;REM  10000001  en  binaire 

90  rangee8=255:REM  11111111  en  binaire 

100  PRINT"La  ligne  110  redefinie  la  lettre  i(105).  Tapez  que 

lques  'i'  et  regardez  !" 

110  SYMBOL  105, rangeel , rangee2, rangeeS, rangee4, rangee5, range 

e6,rangee7,rangee8 

run 


COMM  ANDE  :  Rcdefinit  la  forme  d'un  caractere  afftche  a  I'ecran.  Chacun  des  parame- 
tres  prend  une  valeur  entiere  situee  entre  0  et  255. 
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Afin  d'etre  en  mesure  d'attribuer  une  place  en  memoire  a  un  caractere  redefini,  Pordina- 
teur  doit  avoir  ete  prepare  par  ia  commande  : 

SYMBOL    AFTER   K 
...ou  x  est  inferieur  ou  egat  au  numifo'dii  feiractere  a  redefinir. 

On  entre  ensuite  la  commande  SYMBOL,  suivie  immediatement  du  numero  de  caractere 
x. 

On  peut  toujours  faire  apparaitre  a  l'ecran  Ie  caractere  correspondant  a  la  valeur  de  x, 
meme  s'il  n'est  pas  accessible  par  Pintermediaire  du  clavier.  On  utilise  pour  cela  la  com- 
mande : 

PRINT   CHR*U} 

Apres  SYMBOL  x  viennent  les  huit  parametres  defmissant  une  a  une  les  huit  lignes 
constituant  le  caractere,  en  commencant  par  1c  haut.  Chacun  des  parametres  prend  une 
valeur  comprise  entre  0  et  255.  C'cst  la  representation  binaire  du  parametre  qui  definit  le 
motif  de  la  Signe  correspondante  dans  le  nouveau  caractere. 

Si,  par  exemple,  on  donne  au  premier  parametre  la  valeur  1,  la  representation  en  binaire 
de  la  premiere  rangee  sera  alors :  00000001 .  Le  point  correspondant  au  1  apparattra  dans 
le  caractere  et  sera  de  Ia  couleur  definie  dans  la  commande  PEN.  En  revanche,  les  points 
correspondant  aux  0  seront  affiches  avec  la  couleur  PAPER,  e'est-a-dire  qu'ils  n'apparai- 
tront  pas.  On  peut  done  constater  que  le  caractere  redefini  dans  notre  exemple  compor- 
tcra  un  point  dans  le  coin  supcricur  droit.  Si  Pon  attribue  aux  sept  autres  parametres  les 
valeurs :  3,  7, 15.  31,63,  0,  0,  on  obu'ent  la  representation  en  binaire  suivante : 

parametre  (rangee)  1  :  0000000 1  (1  en  decimale) 
parametre  (rangee)  2  :  0000001 1  (3  en  decimale) 
parametre  (rangee)  3  :  000001 1 1  {7  en  decimale) 
parametre  (rangee)  4 :  00001  111  ( 1 5  en  decimale) 
parametre  (rangee)  5  :  000!  1 1 1 1  (31  en  decimale) 
parametre  (rangee)  6  :  001 1 1 1 1 1  (63  en  decimale) 
parametre  (rangee)  7  :  00000000  (0  en  decimale) 
parametre  (rangee)  8  :  00000000  (0  en  decimale) 

Cette  disposition  des  parametres  transcrits  en  binaire  permet  de  visualiser  la  forme  du 
nouveau  caractere.  On  peut  affecter  ces  parametres  au  caractere  numero  255,  par  exem- 
ple, au  moyen  de  la  commande  : 

SYMBOL  255, 1,3,7, 15, 31, i3, 8,0 
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On  remarque  qu'il  est  inutile  de  faire  figurer  les  deux  derniers  parametres  dans  la  mesure 
ou  il  sont  nuls. 

SYMBOL  255,1,3,7,15,31,63 

On  peut  eviter  de  convertir  en  notation  decimale  les  symboles  binaires  constituant  le 
«  dessin  »  du  caractere.  II  sul'fit  pour  cela  d'inlroduire  les  parametres  directement  en 
binaire,  sans  oublier  le  prefixe  &X.  Dans  noire  cas  : 

SYMBOL    255,fcXfl00000BI,fcX0fl0Bfl011,liXa0B0fltll,fcX0B0Bnil 
U00BUili,fcX0fll  11111 

Voici  mainienant  la  eommande  perraettant  de  faire  apparaitre  le  caractere  : 

PRINT    CHR*(255> 

Si  les  parametres  ci-dessus  sont  affectes  a  un  des  caracteres  du  clavier,  le  caractere  redefini 
apparaitra  chaque  fois  qu'on  actionnera  la  touche  corrcspondante,  de  meme  qu'a  chaque 
eommande  PRINT  le  concernanl.  Ce  nouveau  caractere  sera  accepte  par  le  BASIC 

comme  1'equivalent  du  caractere  remplace. 

Pour  plus  d'informations  concernant  la  redefinition  de  caracteres,  voir  la  deuxiemc  partie 
du  chapitre  intitule  «  A  vos  heures  de  loisir...  ». 

Motsclesassocies:  HIM  EM,  MEMORY,  SYMBOL  AFTER 


SYMBOL  AFTER 

SYMBOL  AFTER  <nombre  entier> 

10  CLS 

20  SYMBOL  AFTER  115  .  .\  ■  .   ■ 

30  PRINT"La  liqne  40  redefinie  la  lettre  5  ; 

40  SYMBOL  115,8,56,64,64,48,8,8,112 

50  PRINT "en  s"  , 

60  PRINT"on  revient  a  l'etat  normal  en  tapant: 

70  PRINT"SYMBOL  AFTER  240" 
run 

COMMANDE :  Fixe  la  limite  inferieure  des  numeros  de  caracteres  redefmissables  (de  0 
a  255).  La  valeur  par  delaut  du  nombre  entier  est  de  240,  auquel  cas  on  dispose  de  16 
caracteres  redefinissables  (entre  240  et  255).  Lorsque  le  <  nombre  entier>  a  pour  va- 
leur 32.  tous  les  caracteres  situcs  entre  32  et  255  sont  redefinissables.  La  eommande 
SYMBOL  AFTER  256  interdit  done  toute  redefinition  de  caractere. 

La  eommande  SYM  BOL  AFTER  retablit  la  valeur  par  defaut  de  tous  les  caracteres  pre- 

cedemment  redefinis. 
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La  commande  SYMBOL  AFTER  ne  peut  PAS  fonctionner  si  la  valeur  de  HIM  EM  a 
ete  precedemment  modtfiee  par  une  commande  MEMORY  ou  par  1'ouverture  d'un 
fichier  au  rnoyen  de  OPENIN  ou  OPENOUT.  L'ordinateur  affiche  dans  ce  cas  le  mes- 
sage d*erreur  «  improper  argument  »,  (a  moins  que  Petal  precedent  ne  soit  SYMBOL 
AFTER  256). 

Pour  plus  de  details  concernant  les  caracteres  redefmissables,  consultez  la  deuxieme  par- 
tie  du  chapitrc  intitule  «  A  vos  heures  de  loisir...  » 

Motscles  associes :  HiMEM,  MEMORY,  SYMBOL 


TAB 

(voir  PRINT  TAB) 

TAG 

TAG  {  #  <numero  de  canal  >] 

IB  INPUT  "entrez   votre  no«"ja*jCLS 

20  PRINT"Quel    va   et    vient   "ja*}"    !!" 

30  TAG 

48  x=LEN(a*)*17;y=50+RND*300:MOVE  -x,y 

50  FOR  f=-x  TO  640  STEP  RNDI7+3 

60  MOVE  *,yiPRINT"  "  j a$; : FRAME: NEXT 

70  FOR  b=640  TO  -x  STEP  -RNDI7+3 

80  MOVE  b, yjPRINT  a*;"  "; sFRAMEt NEXT 

90  GOTO  40 

run 


COMMANDE :  Ecrit  le  texte  specifie  a  la  position  du  curseuf  graphique.  Cette  com- 
mande permet  d'introduirc  du  texte  et  des  symboles  dans  un  graphique  et  de  les  deplacer 
pixel  par  pixel  plutot  que  caractere  par  caractcrc.  Lc  numcro  dc  canal  prend  par  defaut 
la  vaieur  ft  0. 

L'extremite  gauche  de  la  chatne  de  caracteres  se  positionne  sur  le  curseur  graphique  (Text 
At  Graphics).  Les  caracteres  de  controle  non  visualises  tels  que  le  changement  de  Iigne 
ou  le  retour  chariot  n'auront  aucun  effet  a  I'ecran  si  1'instruction  PRINT  est  terminee  par 
un  point-virgule ;  dans  le  cas  contraire,  ils  apparaitront  sous  Ieur  forme  graphique. 

Si  1'indicateur  de  canal  est  #  0  (par  defaut),  BASIC  annule  la  commande  TAG  lors  du 
retour  en  mode  direct. 

Mots  cies  associes  :  TAGOFF 
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TAGOFF 

TAG  OFF  [if  <numero  decanal  >]  '..■■■,- 

18  MODE   2: TA6 J  REM   texte   aux    coordonnees   graphtques 

20  annee=1984:F0R   x  =  l    TO   640   STEP   68 

30  MOVE    x,400:DRAWR    0,-350 

40  annee=annee+i:PR!NT    annee;sNEXT 

50  TAGQFFsREM   retour    aux    coordonnees    texte 

60  LOCATE   28,25:PRINTMchiHres    annuels" 

70  GOTO   78 

run 


COMMANDE:  Annule  la  commande  TAG  concernant  le  canal  indique  (ff  0  par 
defaut).  Le  texte  se  trouve  done  a  nouveau  dirige  sur  la  position  du  curseur  de  texte. 

Mots  cles  associes  :  TAG 


TAN 

TAN  (<  expression  numeriquo) 

PRINT    TAN(45) 
1.6197751V 


FONCTION  :  Calcule  la  TANgente  de  I'< expression  numeriquo,  qui  doit  etre  com- 
prise entre  -200000  et  +  200000. 

On  peut  exprimer  I' argument  en  degres  ou  en  radians  par  1'intermediaire  des  fonctions 
DEG  et  RAD,  respectivement. 

Mots  cles  associes :  ATN,  COS,  DEG,  RAD,  SIN 
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TEST 

TEST  (<coordonnee  x>,<coordonnee  y>) 

ID  CLS 

20   PRINT'Vous   utilisez    le   stylo    (pen)    Not "} 

30    PRINT    TESTU2,394) 

40  PRlNT"Changez  de  mode  et  de  stylo"! 

58  PRINT"...  puis  faites  RUN." 

run 


FONCTION  :  Place  le  curseur  graphique  a  la  position  deftnie  par  x  et  y  (en  coordonnees 

absolues)  et  indique  la  valeur  du  parametre  <encre>  a  cet  endroit. 

Motscles  associes :  MOVE,  MOVER,  TESTR,  XPOS,  YPOS 


TESTR 

TESTR  (<decalage  x>,<decalage  y>) 

10   MODE   0:FOR   x=t    TO    ISjLOCATE   1,x 
20    PEN   xsPRINT    STRING*< IB, 143) ; tNEXT 

30    HOVE    200,400:PEN    1 

40   FOR   n=l    TO   23ilQCATE    12, n 

50  PRINT'pen"; TESTR (0,-161: NEXT 

run 

FONCTION  :  Place  le  curseur  sur  une  position  de  coordonnees  x  et  y  par  rapport  a  sa 
position  actuelle  et  indique  la  valeur  du  parametre  <encre>  a  cet  endroit. 

Mots  cles  associes  :  MOVE,  MOVER,  TEST,  XPOS,  YPOS 


/TAT 


THEN 

(voir  IF) 
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TIME 

TIME 


18  CLSiREK  horlog* 

20    INPUT    "heure";haure 
30    INPUT   "<?iinut8"5f»inute 

40  INPUT  "seconde"iSBconde 

50  CLS:donnee=INT(TIME/300) 

60  WHILE  heure<13 

70  WHILE  iunute<6B 

80  WHILE  tic<60 

90  tic=(INT(TIME/30B)-donnee)+seconde 

100  LOCATE  1,1 

110  PRINT  USING  "##  ";heure; minute;tic 

120  WEND 

138   ti  c=0s5econde  =  0:*iinute=minute+l 

140  GOTO  50 

150  WEND 

160  »inute=0iheure=heure+l 

170  WEND 

180  heure-1 

190  GOTO  60 

run 


FONCTION  :  Indique  le  temps  ecoule  depuis  la  mise  sous  tension  de  Pordinateur  ou  la 
derniere  commande  RESET  {Ies  temps  de  transfert  entre  Pordinateur  et  Punite  de  dis- 
quettene  sont  pas  comptes). 

A  chaque  seconde  correspond  une  fois  la  valeur ;  TIME/300. 

Mots  cles  associes  :  AFTER,  EVERY,  WEND,  WHILE 

TO 

(Voir  FOR) 
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TROFF 
TRON 

TROFF 
TRON 

10  TROFFiPRINT;PRINT"TROFF" 

20  FOR  n=l  TO  8 

38  PRINT'Le  programme  tournt" 1NEXT 

40  IF  f»l  THEN  END 

58  TRONiPRINTiPRtNT  "TRON" 

6(9  f»l!60T0  20 

run 

COMMANDE :  Permet  de  suivre  1'execution  d'un  programme  par  l'affichage  de  chaque 
numero  de  ligne  executee.  Ce  numero  est  affiche  entre  crochets  [].  Cette  fonction  s'ob- 
tient  au  moyen  de  la  commande  TRON.  La  commande  TROFF  retablit  Ie  mode  normal 
d'execution.  La  commande  TRON  est  particulierement  precieuse  lorsque  Ton  desire 

suivre  ligne  par  ligne  !e  dcroulement  d'un  programme  afin  de  corriger  une  erreur. 

Mots  cles  associes  ;  Aucun 


UNT 
UNT(<adresse>) 

PRINT  UNT(fcFF66> 

-154 

COMMANDE:  Convertit  1'argument  en  un  nombre  entier  signe  (en  representation: 

complement  a  2)  compris  entre  -32768  et  32767. 

Mots  cles  associes  :  CI  NT,  FIX,  INT,  ROUND 

UPPERS 

UPPERS  (<chaine  alphanumeriquo) 

IB  CLS: a*="me5   petites,    coilifle  voub  avez  qrandies    !" 

20   PRINT    UPPER*(a$) 
run 

FONCTION :  Recopie  la  <chaine  alphanumeriquo  indiquee  en  remplacant  par  des 
majuscules  les  caracteres  alphabetiques  (de  A  a  Z)  apparaissant  en  minuscules.  Cette 
fonction  s'utilise  en  particulier  pour  le  traitement  d'entrees  dans  lesquelles  se  trouvent 
melangees  des  majuscules  et  des  minuscules. 

Mots  cles  associes  :  LOWER$ 
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USING 

(voir  PRINT  USING)      .  f  <  -lO'rWK  -  :      - ■-■^■•st -  mw  ■  ■  ' 

VAL 

VAL  ( <  chaine  de  caracteres  > ) 

IB  CLS:PRINT  "Je  connais  *es  tables  !" 

20  PRINT;PRINT"presse2  une  touche  (1-9)" 

30  a*=INKEY*:IF  a*=n"  THEN  30 

40  n  =  VALU*}!lF  n<l  OR  n>9  THEN  31 

50  FOR  x=l  TO  12 

60  PRINT  n;"X";x5"=";n*x 

70  NEXTiGOTO  20 

run 

FONCTION  :  Fournit  la  VALeur  numerique  du  ou  des  premiers  caracteres  (y  compris 
le  signe  negatif  et  !e  point  decimal)  de  la  < chaine  alphanumerique  >  indiquee. 

On  obtient  la  valeur  0  lorsque  le  premier  caractere  de  la  chaine  n'est  pas  un  chiffre.  Si  le 
signe  « - »  apparait  en  premier  caractere  ou  si  celui-ci  est  un  point  decimal  suivi  d'un 
caractere  non  numerique,  le  message  d'erreur  «  Type  mismatch  »  (erreur  de  frappe) 
(13)  s'afTiche  a  l'ecran. 

Mots  cles  associes :  STR$ 

VPOS 

VPOS  ( ft  <numero  de  canal  >) 

10    MODE    liBORDER   BsLOCATE   8,2 

20   PRINT"util  isez    les    touches    Hechees    (haut/bas)" 

30   WINDOW    39,39, 1,25:CURSDR    1,1 

40  LOCATE  1, 13 

50  IF  1NKEY(0)O-1  THtN  PRINT  CHRKil)} 

60  IF  INKEY(2K>-1  THEN  PRINT  CHR»  { 10)  ; 

70  LOCATE  #1,3,24 

80  PRINTf 1, "curseur  texte  "; 

90  PRINT #1 , "position  verticals  ="5 

100  PRINT*!, VPQS(*B> sGOTO  50 

run 

FONCTION  :  Indique,  sur  1'axe  Vertical,  la  POSition  du  curseur  de  texte,  a  partir  du 
bord  superieur  de  la  fcnetre  de  texte.  L'indicateur  de  canal  doit  obligatoirement  figurer ; 
il  ne  prend  pas  la  valeur  #  0  par  defaut. 

Mots  cles  associes  :  POS,  WINDOW 
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WAIT 

WAIT  <numerodu  port  >,<  masque  >[,<  in  version  >]  if>WPM 

WAIT   *FF34, 28,25 

COM MANDE  :  Provoque  une  attente  jusqu'a  ce  que  le  port  d'entrees-sorties  designe 
transmctte  une  valeur  comprise  entre  0  et  255 ;  de  telie  sorte  qu'apres  avoir  opere  un  XOR 
(OU  exclusif)  avec  le  < masque >,  puis  un  AND  (ET)  avec  le  parametre  d'< inversion >, 

on  obtienne  un  resultat  non  nul, 

Le  BASIC  attend  jusqu'a  ce  que  la  condition  soit  verifiee. 
Cette  commande  est  a  utiliser  avec  precaution. 
Mots  cles  associes  :  INP,  OUT 

WEND 

WEND 

WEND 

COMMANDE  :  Indique  la  fin  d'une  section  de  programme  executee  a  Finterieur  d'une 
boucle  WHILE.  Le  BASIC  reconnatt  automatiquement  la  commande  WHILE  a  laquelle 
WEND  est  associec. 

Mots  cles  associes  :  TIME,  WHILE 

WHILE 

WHILE  <expression  Iogiquo 

10  CL6  :PR I  NT  "chronometre  dt  10  socondes": t-TIHE 

20  WHILE  TIMEU  +  3000 

30    SOUND    1,0,100,15 

40    WENDiSQUND    129,40,30,15 

run 

COMMANDE :  Repetc  une  section  de  programme  tant  qu'une  condition  donnee  est 
verifiee.  Le  mot  de  WHILE  indique  le  debut  de  la  section  a  executer  tandis  que  1' expres- 
sion Iogiquo  definit  la  condition  a  verifier. 

Mots  cles  associes  :  TIME,  WEN D 
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WIDTH 

WIDTH  <nombreentier>  ■'=    ■  '"■'ii:'    ■  '  : ;!!': 

WIDTH   48 

COMMANDE  :  Indique  le  nombre  de  caracteres  par  ligne  lors  d'une  sortie  sur  impri- 
mante.  Le  BASIC  se  charge  done  d'envoyer  automatiquement  les  retours  chariot  et  les 
sauts  de  ligne  necessaires  durant  rimpression. 

En  1'absence  d'une  commande  WIDTH,  Fordinateur  adopte  par  defaut  la  valeur  132. 
La  commande  WIDTH  255  supprime  tous  les  retours  chariot  et  sauts  de  ligne  supple- 
mentaires  laissanl  a  l'imprimante  le  soin  de  generer  elle-meme  ces  caracteres.  Cependant, 
les  retours  chariot  et  sauts  de  ligne  normaux  dus  a  ['instruction  PRINT  continuent  a  etre 
envoyes  a  moins  que  la  commande  PRINT  ne  soit  terminee  par  un  «  ;  »  ou  une  virgule. 

Mots  cles  associes  :  POS 


WINDOW 

WINDOW  [  #  <numero  de  canal >,]< gauche >,<droite>,<haut>,<bas> 

10  MODE   0:BQRDER  0j  REM  cibU  tv 

28    INK   0,B:INK    1,25: INK   2,23iINK   3,21 

30    INK  4,  17 : INK  5,6sINK  6,2: INK  7,26 

40   PAPER   0:CLS 

50  PAPER  tsWINDOM  2,4,i,18sCLS 

60  PAPER  2: WINDOW  5,7,1,18; CLS 

78  PAPER  3:WIND0W  8, 1 0,  1 ,  18; CLS 
80  PAPER  4:WINDQW  1 1 ,  13,  1 ,  18: CLS 
90  PAPER  5iWIND0W  14,  16,  1 , 18i CLS 
100  PAPER  6:WIND0W  17,  19, 1 , 18s CLS 
110  PAPER  7: WINDOW  2,  19,  1  9, 25: CLS 
120  GOTO  120 
run 


COMMANDE  :  En  mode  texte,  indique  les  dimensions  d'un  canal  d'affichage  a  Tecran 
(on  parte  dans  ce  cas  de  fenetre).  On  veillera  a  ce  que  les  valeurs  des  parametres 
<gauche>,  <droite>.  <haut>  et   <bas>  correspondent  bien  aux  coordonnees  en 

vigueurdans  le  MODF.-ecran  utilise. 


Le  <numero  de  canal >  prendra  par  defaut  la  valeur  ff  0. 

Pour  plus  de  details  concemant  les  fenetres,  voir  la  deuxierrie  partie  du  chapitre  intitule 
«  A  vos  heures  de  loisir...  ». 

Mots  cles  associes  :  WIN  DOW  SWAP 
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WINDOW  SWAP 

WINDOW  SWAP  <numero  de  canal  >,<  numero  de  canal > 

10  MODE  1 : INK  i, 24: INK  2,9:INK  3,6 

20  WINDOW  21 ,40, 13,  25:PAF'ER  3 

30  WINDOW  Hi, 1,20, 1,12;PAPER  #1,2 

40  CLSsPRINT  #1,"  Fenetre  No" 

58  CLS  #1:PRINT  #1,"  Fenetre  No  1"  ' 

60  LOCATE  1,6 

70  PRINT"  Fenetre  Rouge  (0)";SPC(2) 

80  LOCATE  #1,1,6 

90  PRINT  #1,"  Fenetre  Verte  U)" 

100  FOR  t=l  TO  1000: NEXT 

110  WINDOW  SWAP  0,lsGQTO  60 

run 


COMMANDE :  Intervcrtit  la  premiere  fenetre  et  la  seconde. 

Les  deux  <numeros  de  canal>  doivent  obligatoirement  figurer  sans  etre  precedes,  dans 
ce  cas  precis,  de  Pindicateur  de  canal  if. 

Cette  commande  permet  de  diriger  les  messages  BASIC  sur  un  autre  canal  que  celui  par 
defaut  #  0. 

Pour  plus  de  details  concernant  les  fenetres,  voir  la  deuxieme  partie  du  chapitre  intitule 
«  A  vos  heures  de  loisir...  ». 

Mots  cles  associes :  Wl  NDOW 


WRITE 

WRITE  [ »  <  numero  de  canal >,][<  donnees  a  ecrire>] 

10  REM  ecrit  des  donnees  sur   la  disquette 

20   INPUT   "donnez-moi    un  nombre";a 

30    INPUT    "donnez-moi    une   chaine  de   caracteres"} a$ 

40    OPENOUT    "NOMFICH" 

50    WRITE    #9,a,a$ 

60   CLOSEOUT: PRINT    "Les   donnees   sont    sauvees  sur  disquette' 

run 


COMMANDE  :  Affiche  ou  ecrit  (WRITE)  des  donnees  sur  le  canal  indique.  Deux  arti- 
cles distincts  doivent  etre  separes  par  une  virgule  et  les  chaines  de  caracteres  sont  placees 
entre  guillemets. 
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Dans  notre  exemple,  les  donnees  entrees  seront  ecrites  sur  le  canal  ff  9,  c'est-a-dire  enre- 
gistrees  sur  disquette. 

Pour  retrouver  tes  donnees,  on  utilisera  le  programme  ci-dessous  : 

10  REM  retrouve  les  dannees  sur  la  disquette 

20  DPENIN  "NOMFICH"! INPUT  *9,a,a$ 

30  CLQSEIN;PRINT"les  2  donnees  sonts" 

40  PRINT:PRINT  a, a* 

run 

Mots  cles  associes  :  INPUT,  LIN  E  IN  PUT 


XOR 

<  argument  >  XOR  <  argument  > 

IF  "alain"  <  "bernard"  XOR  "chien"  >  "chat"  THEN  PRINT 

"vrai"  ELSE  PRINT  "faux" 
faux 
IF  "bernard"  <  "alain"  XOR  "chat"  >  "chien"  THEN  PRINT 

"vrai"  ELSE  PRINT  "faux" 
faux 
IF  "alain"  <  "bernard"  XOR  "chat"  >  "chien"  THEN  PRINT 

"vrai"  ELSE  PRINT  "faux" 
vrai 

PRINT  1  AND  1 

0 

PRINT  0  AND  0 

0 

PRINT  1  AND  0 

I 


OPERATEUR :  Effectue  bit  a  bit  l'operation  booleenne  XOR  (OU  exclusif)  sur  des 
entiers.  Lorsque  les  bits  des  deux  arguments  ne  sont  pas  identiques,  le  bit  resultant  vaut 
1. 

Pour  plus  de  details  concernant  les  operateurs  logiques,  voir  la  deuxieme  partie  du  ehapi- 
tre  intitule  «  A  vos  heures  de  ioisir...  ». 

Mots  cles  associes :  AND,  OR,  NOT 
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XPOS 

XPOS 


10   MODE   liDRAW   320,200 

20   PRINT"POSition   X   du   curseur   graphiquB="; 

30    PRINT    XPOS 

run 


FONCTION  :  Indique,  sur  l'axe  horizontal  (X),  la  POSition  du  curseur  graphique. 
Mots  cles  associes  :  MOVE,  MOVER.  ORIGIN.  YPOS 

YPOS 

YPOS 

10  MODE  ltDRAW  320,200 

20  PRINT"PQSition  Y  du  curseur  graphique="; 

30  PRINT  YPOS 

run 

FONCTION  :  Indique,  sur  l'axe  vertical  (Y),  la  POSition  du  curseur  graphique. 
Mots  cles  associes  :  MOVE,  MOVER,  ORIGIN,  XPOS 

ZONE 

ZONE  <nombreentier> 

10  CLS:F0R   z  =  2   TO   20 

20    ZONE    z 

30    PRINT    "X","X    ZONE   s-jzsNEXT 

run 


COMMANDE  :  Modifie  la  largeur  de  la  tabulation  designee  par  la  virgule  dans  la  com- 
mande  PRINT.  La  largeur  des  zones  d'affichage  ou  d'impression,  (de  13  caracteres  par 
defaut),  peut  ainsi  prendre  une  valeur  entiere  quelconque  entre  1  et  255. 

Mots  cles  associes  :  PRINT 
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Chapitre  4 

Utilisation  des  disquettes  et  des  cassettes 


Partie  1 :  Disquettes 

Preparation  des  disquettes  de  travail 

Ce  chapitre  traite  de  la  facon  de  gerer  vos  disquettes  pour  un  usage  quoti- 
dien  et  presente  quelques-uns  des  utilitaires  CP/M. 

Sujets  abordes : 

*  Duplication  des  disquettes  systeme 

*  Introduction  au  CP/M  Plus 

*  Utilisation  des  fichiers  Help 

*  Fonctionnement  du  systeme  avec  une  ou  plusieurs  unites 

*  Copie  de  fichiers  avec  PIP 

*  Utilisation  d'une  disquette  pour  un  travail  en  BASIC  uniquement 

*  Progiciel  en  BASIC  AMSTRAD 

*  Installation  d'un  progiciel  CP/M  PLus 

*  Introduction  aux  extensions  graphiques  GSX 

*  Exploitation  sous  CP/M  2.2 

La  partie  7  du  Cours  Elemcntaire  montrait  comment  formater  une  disquette  viergedesti- 
nee  a  la  sauvegarde  des  programmes  en  BASIC  des  jeux,  ou  de  CP/M.  La  partie  10  du 
Cours  Elementaire  montrait  comment  faire  des  duplications  fideles  de  disquettes  a  I'aide 
du  programme  DISCKIT  3  (face  1  de  Tune  des  disquettes  systeme).  Ce  chapitre  concerne 
la  facon  de  preparer  une  disquette  destinee  a  recevoir  des  programmes  et  des  utilitaires 
de  votre  choix. 
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La  duplication  de  la  Disquette  Systeme 

II  est  tres  important  de  faire  une  copie  de  la  disquette  systeme  fournie  avec  votre  ordina- 
teur  et  de  garder  1'original  en  lieu  stir.  II  vous  en  coulcrait  beaucoup  pour  la  remplacer  ! 

Rappelez-vous  que  chacune  des  disquctlcs  fournies  avec  le  CPC6128  possedc  deux  faces. 
Vous  avez  done  quatrc  faces  au  total. 

La  face  1  est  la  plus  imporiantc  carelle  contient  la  copie  du  systeme  d'exploitation  CP/M 
Plus  et  un  ensemble  d*utilitaires  servant  au  Iraitcment  des  disqucltes.  La  face  2  comprend 
des  fichiers  destines  aux  programmeurs-assembleurs  et  la  face  3.  le  Dr.  LOGO,  les  fichiers 
«  Help  »et  les  extensions  graphiques  GSX  (nous  y  reviendrons  plus  tard).  Quant  a  la  face 
4,  elle  contient  le  systeme  CPM2.2  ct  la  version  du  Dr.  LOGO  disponiblc  precedemment 
pour  les  ordinatcurs  AMSTRAD  CPC664  et  CPC464+DDI1:  ces  programmes  vous 
sont  fournis  pour  des  raisons  de  compatibilite.  lis  ne  vous  serviront  que  rarement. 

Vous  devcz  conserver  ces  copies  sous  forme  de  «  bibliotheque  »  dc  programmes.  Vous 
selection nerez  le  programme  qui  vous  inlercssc  en  prenant  une  des  disqueties  de  cette 
bibliotheque  plutol  qu'en  effectuanl  une  copie  du  dit  programme  sur  une  disquette  vierge 
pour  le  lancer  ensuite. 

Nous  insistons  bien  sur  le  fait  que  les  disquettes  que  vous  utiliserez  DOIVENT  ETRE 
DES  COPIES  effectuees  a  partir  des  disquettes  systeme  fournies  avec  1'ordinalcur. 

Si  vous  prenez  une  disquette  vierge  pour  y  faire  une  copie,  le  programme  DISCKIT3 
(face  1)  la  formatera  avant  d*executer  la  copie. 

Introduction  au  CP/M  Plus 

Le  BASIC  AMSTRAD  entre  en  jeu  des  la  mise  sous  tension  de  votre  ordinatcur.  II  se 
charge  des  operations  jusqu'a  ce  que  vous  lanciez  un  programme  BINaire  a  partir  de 
TAMSDOS  (ou  d*unc  cassette)  ou  que  vous  chargiez  le  CP/M  Plus  a  Taide  de  la  com- 
mando :CPM. 

Aprcs  chargement  de  CP/M  PI  us.  le  CPC6128  n'a  plus  besoin  de  la  face  I  dc  la  disquette 
systeme,  a  moins.  bien  sur,  que  vous  ne  desiriez  exploiter  Pun  des  utilitaircs  stockes  sur 
cette  face  de  la  disquette.  Seule  la  disquette  d'amorcage  du  systeme  doit  etre  une  disquette 
systeme  ;  par  la  suite,  vous  pouvez  inserer  des  disquettes  de  donnees  a  plus  grande  capa- 
cite  de  stockage. 

Pour  ianccr  un  programme,  il  suffit  d'inserer  la  disquette  contenant  le  programme  desire 
et  de  taper  son  nom.  Les  donnees  utilisccs  par  le  programme  peuvent  se  trouvcr  sur  la 
meme  disquette  que  celui-ci.  ou  sur  une  autre.  CP/M  Plus  aulorise  la  permutation  des  dis- 
quettes tout  commc  I'AMSDOS.  Si  plusicurs  programmes  ct  quelques  utilitaircs  doivent 
se  trouver  sur  la  meme  disquette  pour  des  raisons  de  commoditc.  utilisez  le  programme 
PIP  sur  la  face  I  d'une  des  disquettes  systeme  (voir  plus  loin,  dans  ce  chapitre,  ei 
chapitre  5). 
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Creation  de  profils 

L'une  des  disquettes  systeme  fournit  un  fichier  special  appele  PROFILE.SUB  contenant 
une  liste  de  commandes  executees  aulomatiquement  des  le  lancement  de  CP/MPlus.  Vous 
pouvez  alors  (si  ce  nest  pas  deja  fait)  inserer  une  copie  de  la  face  1  des  disquettes  systeme 
et  taper  a  la  suite  du  message  A: 

REN  PROFILE. SUB=PR0FILE.  ENG 

Vous  creez  ainsi  lc  fichier  PROFILE.SUB  a  partir  de  PRO  FILE.  ENG.  Ce  profil,  qui 
sera  execute  au  prochain  lancement  de  CPM  Plus,  contienl  les  commandes: 

SETKEYS  KEYS.CCP 
LANGUAGE  3 

Elles  permettent  d'adapter  les  touches  du  clavier  a  la  frappe  des  commandes  CP/M  et 
convertir  certains  caracteres  (pour  l'obtention  du  signe  «  £  »,  par  exemplc.  en  tapant 
[SHIFT]3. 

Apres  utilisation  de  la  commande  SET  KEYS.CCP,  les  lignes  de  commandes  CP/M  sont 
cditecs  au  clavier  de  la  memc  facon  qu'en  BASIC.  Pour  plus  dc  details,  consulted  la  partie 
2  du  chapitrc  5. 

Une  main  tendue 

La  face  3  d'une  des  disquettes  systeme  comporte  un  programme  special  appeile  «  Help  », 
concu  commc  un  manuel  didactiquc  electronique  pour  les  utilitaircs  CP/MPlus.  Pour 
acliver  cctte  fonction.  inserez  la  face  3  ct  tapez.  a  la  suite  de  A> : 

HELP 

Le  programme  «  Help  »  vous  prcscnte  alors  une  serie  de  questions  pour  vous  fournir  les 

informations  d'aidc  requiscs. 

Une  ou  deux  unites? 

Au  premier  chargement  de  CP/MPlus.  le  systeme  detecte  le  nombre  d'unites  de  disquettes 
reliecs  a  lordinateur  et  raffiche  a  la  suite  du  message  d' identification.  Cc  procede  risque 
d'etre  faussc  si  la  disquettc  de  la  scconde  unite  n'est  pas  entierement  inseree. 

Tous  les  messages  d'errcur  sont  affiches  sous  forme  de  bannierc  a  la  vingt-cinquieme  ligne 
de  1  "reran,  les  24  premiere  lignes  ctant  ulilisees  par  les  programmes. 
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Meme  si  voire  systeme  ne  possede  qu'une  unite,  le  message  «  Drive  is  A:  »  ou  «  Drive 
is  B:  »  sera  afliche  sur  la  derniere  ligne  de  I'ecran:  en  eflet,  CP/MPlus  vous  permet  de 
travaiiler  avec  une  seule  unite  physique  comme  si  vous  en  possediez  deux.  Vous  pourrex 
alors  alterner  enire  deux  disqueltes.  el  la  banniere  de  message  vous  indiquera  quand  inse- 
rer  la  bonne  disquelte.  suivant  les  besoins.  Cette  facon  de  proceder  vous  evite  1'achat 
d'une  sccondc  unite  mais  elle  exigc  unc  permutation  frequente  des  disquettes; elle se  revclc 
done  fastidieuse  el  gene  rat  rice  d'erreurs. 

Copie  de  fichiers  d'une  disquette  sur  une  autre 

Pour  copier  des  fichiers  d'une  disquette  sur  une  autre,  vous  disposez  d'un  utilitaire  stan- 
dard PIP  (Peripheral  Interchange  Program/Programme  d' Interconnexion  aux  Peripheri- 
ques). 

Chargez  le  PIP  a  partir  de  la  facel  et  tapez  a  la  suite  dc  A  > : 
PIP 

Un  nouveau  message,  *.  vous  indique  le  chargement  correct  du  PIP.  Normalcment,  vous 
copiez  des  fichiers  d'une  disquette  source  (unite  A)  sur  unc  disquette  ciblc  (uniteB).  Nous 
avons  vu  que  dans  un  systeme  a  unc  scule  unite  le  precede  est  le  memc. 

Pour  copier  un  fichier,  par  excmple  SUBMIT.COM,  tapez  a  la  suite  du  message  *: 

B:=AsSUBMIT.COH 

Pour  copier  la  total itc  des  fichiers  d'une  disquette  source  sur  une  disquette  cible,  la  com- 
mande  sera: 

B  — I.I 

Pour  sonir  du  programme  PIP,  appuyez  sur  [RETURN]  a  I  apparition  du  message  *. 

PIP  est  un  programme  tres  perfectionne;  son  fonctionnement  sera  approfondi  au  chapi- 
tre5. 

Une  disquette  reservee  au  BASIC 

Comme  nous  l'avons  deja  vu.  les  disquettes  systeme  ne  servent  qu'a  Tamorcage  du  sys- 
teme CP.  MPlus.  Les  disquettes  deslinees  au  BASIC  peuvenl  done  ne  conlenir  que  des 
donnees  ct  offrir  une  capacile  dc  stockage  legcrcment  superieure. 

La  disquette  doil  ctre  formatee  a  I'aide  du  programme  DISCKIT3.  Pour  copier  des  pro- 
grammes sur  cette  disquellc,  vous  devez  utiliser  PIP  (charge  a  partir  de  la  face  I)  ou 
LOAD  suivi  de  SAVE  sous  BASIC. 
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Progkiel  en  BASIC  AMSTRAD 

Si  vous  achetez  un  programme  d'application  ecrit  en  BASIC  AMSTRAD  pour  )e 
6128,  son  execution  commencera  des  la  mise  sous  tension.  II  ne  vous  reste  qu'a  le  recopier 

sur  une  disquette  de  travail. 


Progiciel  sous  CP/M 

Le  systcme  d'exploitalion  CP/M  vous  donne  acces  a  une  immense  librairie  de  logiciels, 
ecrits  pour  des  micro-ordinateurs  travaillant  sous  CP/M.  La  «  iogique  »  fondamentale  de 
ces  programmes  etant  deja  definie,  la  seule  chose  qui  vous  reste  a  fairc  est  de  les  transferer 
sur  une  disquette  correcte  de  votre  6128  et  de  les  informer  sur  sa  maniere  particuliere  de 
gerer  Fee-ran . 

Un  ensemble  de  programmes  sur  une  disquette  ayant  pour  objet  une  application  spectfi- 
que  est  appelc  un  «  progiciel ».  Ces  progiciels  sont  habituellement  concus  pour  etre  utili- 
ses sur  un  bon  nombre  d'ordinatcurs  d liferents,  ayant  chacun  leur  taille  d'ecran  particu- 
liere et  leur  propre  systeme  de  deplaeemcnt  de  curseur. 

Le  6128  dispose  d*un  «emulaleur  de  terminaux»  integre  pour  1'exploilation  des  pro- 
grammes CP/M  Plus,  dont  les  caracteristiques  different  des  codes  de  conlrole  geres  par  le 
BASIC. 

Le  progiciel  pourra  avoir  cte  defini  pour  le  systcme  AMSTRAD  ou  pour  son  adaptation 
au  6! 28.  Le  cas  echeant,  suivcz  les  instructions  fournies  avec  le  logicicl  pour  un  protocole 
Zenith  Z19/Z29.  S'il  n*a  pas  ete  prevu  de  variante  pour  le  systeme  AMSTRAD.  le  para- 
graphe  «  Configuration  d'un  programme  CP'M  ».  un  pcu  plus  loin,  vous  indiquera  les 
commandes  dc  gestion  d'ecran  permettant  d' adapter  le  progiciel  au  CPC6I28.  Cette  pro- 
cedure s'effectue  normalement  en  entrant  au  clavier  des  codes  specifiques.  Encore  une 
fois.  suivez  les  instructions  fournies  avec  le  progiciel. 

La  disquette  contenant  le  logiciel  que  vous  avez  achete  doit  etre  utilisable  par  le  systeme. 
La  majorite  des  ordinateurs  utilisant  leur  propre  format,  Tidentite  de  taille  des  disquettes 
ne  signifie  pas  qu'elles  soient  compatibles.  Demandez  a  votre  fournisseur  la  version  3 
pouces  d'AMSTRAD. 
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Creation  d'un  progicie!  sous  CP/M  sur  disquette 

II  est  souvcnt  utile  d'avoir  sur  une  disquette  dc  progiciel,  avec  le  programme  duplica- 
tion, les  utilitaires  SETKEYS.COM  cl  SUBMIT.COM  (ainsi  que  leurs  fichiers 
destructions). 

PIP  peut  servir  a  transferer  les  fichiers  .COM  et  a  creer  le  fichier  d'instructions  pour 
SUBMIT.  PIP.  dans  ce dernier  cas.  se  revele  ctre  en  effet  un  editeur  ligne  a  lignc  efficace. 
Par  exemple,  le  fichier  L0G03.SUB  sur  la  face  3  aurait  pu  etre  cree  avec  ces  com- 
mandes: 

(inserez  !a  disquette  systeme  dans  l'unite  A,  face  1  vers  le  haut)  Tapez: 

PIP 


(retirez  ia  disquette  et  inserez  la  disquette  cible),  tapez: 

L0S03.SUB=C0Ns 
SETKEYS    KEYS.DRL 
[CONTROUJ    L0G03 
tCfJNTROLH 

La  configuration  d'un  programme  CP/M 

Le  6128  possede  une  gamme  etendue  de  codes  de  reference  pour  Padaptation  de  progiciels 
sous  CP/M.  La  plupart  de  ces  proiogiciels  ont  besoin  d'afficher  et  de  lire  des  messages 
n'importe  ou  sur  1'ecran  ainsi  que  de  comprendre  les  commandes  de  gestion  du  curseur. 
Si  votre  logicicl  a  deja  cte  adapte  pour  le  systeme  AMSTRAD,  ce  qui  suit  ne  vous 

concerne  pas. 

Adaptation  de  votre  progiciel :  les  sorties  (Output) 

La  procedure  de  mise  en  service  d'un  progiciel  consiste  a  executer  un  programme  special 
(souvent  appeie  INSTAL)  qui  vous  pose  un  certain  nombre  de  questions  concernant  les 
parametres  de  1'ecran  du  6128  s'il  ne  gere  pas  un  terminal  de  type  Z19/Z29  ou  le  6128  en 
particulier.  Inspirez-vous  des  reponses  du  tableau  ci-dessous  (ex trait  de  la  partie  15  du 

chapitre  7). 


-•--  ".-i;r  —  -- vr-  ■ 
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Codes  de 

Hexa 

controlc 

[BEL] 

&07 

[BS] 

&08 

[LF] 

&0A 

[CR] 

&0D 

[ESQ  A 

&1B 

&41 

[ESC]  C 

&IB 

&43 

[ESC]  E 

&IB 

&45 

[ESC]  H 

&IB 

&48 

[ESC]  J 

&1B 

&4A 

[ESC]  K 

&1B 

&4B 

[ESQL 

&1B 

&4C 

[ESC]  M 

&1B 

&4D 

(ESC]  N 

&1B 

&4E 

[ESC]  Y 

&1B 

&59 

[ESC]  d 

&1B 

&64 

[ESC]  o 

&1B 

&6F 

[ESC]  p 

&1B 

&70 

[ESQq 

&IB 

&71 

10 

13 

27 

65 

27 

67 

27 

69 

27 

72 

27 

74 

27 

75 

27 

76 

27 

77 

27 

78 

27 

89 

Decimal         Operation  effectuee 


Cloche 

Deplacement  curseur-gauche 

Deplacement  curseur-bas 

Retour  chariot 

Deplament  curseur-haut 

Deplacement  curseur-droite 

EITacement  ecran 

Retour  curseur  en  haut  a  gauche 

Effacement  de  1'ecran  depuis  le  curseur 

(inclus)  jusqu'a  la  fin 

Effacement  de  1'ecran  depuis  le  curseur 

(inclus)  jusqu"au  bord  droit 

Insertion  de  ligne 

Suppression  de  ligne 

Effacement  du  caractere  sous  le  curseur 

Deplacement  curseur  a  une  position  defi- 

nie  de  1'ecran.  c  =  colonne  +  -32, 

r  =  ligne  +  32 
27  100    Effacement  de  1'ecran  depuis  le  debut  jus- 

qu'au  curseur  (inclus) 
27  1 1 1     Effacement  de  1'ecran  depuis  le  bord  gau- 
che jusqu'au  curseur  (inclus) 
27  112    Entree  en  video  inverse 
27  113    Sortie  de  video  inverse 


Adaptation  du  progiciel :  les  entrees  (Input) 

Les  programmes  du  progiciel  doivent  avoir  la  possibility  d'interroger  le  clavier.  A  1'excep- 
tion  des  deplacements  curseur,  la  plupart  des  touches  du  clavier  du  6128  ont  des  valeurs 
standard.  Bien  qu'il  soit  preferable  de  faire  en  sorte  que  le  progiciel  accepte  les  valeurs 
standard  par  defaut,  il  est  possible  d'utiliser  SETKEYS  pour  redefinir  les  codes  donnes 
par  le  clavier. 

Malhcureusement,  il  n'y  a  pasd'uniformite  d'un  logiciel  a  l'autre,  pour  les  touches  d'acti- 
valion  des  fonctions  de  controle  par  cxcmple.  Les  touches  dc  caracteres.  la  barrc  d'espa- 
cement,  les  touches  [TAB]  et  [RETURN]  sont  generalement  les  memes.  mais  pour  I'es- 
pace  arriere  et  bien  d'autres  fonctions  les  choses  se  compliquent.  En  effet.  comparer  par 
exemple  les  codes  de  deplacement  du  curseur  en  debut  de  ligne: 

PourlcCP/M:  [CONTROL] B 

PourDr.LOGO:  [CONTROL]A 

et  pour  un  autre  traiiement  de  texte  cc  sera  [CONTROL]Q  S 
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Trois  jeux  de  codes  clavier  sont  fournis  en  standard.  Chaque  configuration  peut  s'obtenir 
a  partir  des  fichiers  stoekes  sur  la  face  !  d'une  dcs  disquettes  systeme: 

SETKEYS  KEYS.CCP 

Cette  commande  envoyee  automatiquement  par  PROFILE. SUB  definira  le  clavier  cor- 
respondant  aux  commandes  CP/M. 


Demarrage  d'un  progiciel  CP/M  pret  a  l'emploi 

Normalement,  vous  n'avez  qu'a  entrer  le  nom  du  progiciel  apres  l'apparition  du  A>. 
Ainsi,  pour  lancer  un  programme  de  traitement  de  bulletins  de  paye  appele  SALAIRE. 
COM,  tapez  simpiement : 

PAYROLL 

Si  vous  devez  definir  une configuration,  un  fichier  SUBmit  pourra  etre  fourni.  Le  fichier 
L0GO3.SU  B,  sur  la  face  3  d'une  des  disquette  systeme.  en  est  un  exemple.  Vous  1'appe- 
lerez  par  la  commande: 


SUBMIT  L0BQ3 

Vous  pourrez  voir  le  contenu  de  ce  fichier  en  tapant: 

TYPE  LQ6Q3.SUB 

Ce  qui  vous  donne: 


SETKEYS  KEYS.DRL 

LOG03 

SETKEYS  KEYS.CCP 


pour  changer  de  clavier 

pour  lancer  le  programme  Dr.  LOGO 

pour  revenir  au  clavier 


Demarrage  automatique  des  progiciels  CP/M  prSts  a  l'emploi 

Le  systeme  d'exploitation  CP/M  Plus  permet  un  demarrage  automatique  de  n'importe 
quel  programme  chaque  fois  que  Ton  charge  le  CP/M  Plus.  Cette  fonction  est  reatisee  par 
l'une  des  options  PROFILE.SUB.  (Voir  la  partie  2  du  chapitre  «  AMSDOS  et  CP/M  » 
pour  de  plus  amples  informations). 
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Introduction  aux  extensions  graphiques  GSX 

GSX  est  une  extension  graphiquc  du  systeme  qui  permet  aux  programmes  CP/M 
d'cxploiter  des  graphiques.  en  plus  des  textes.  Vous  pouvez  ainsi  dessiner  des  graphiques 
a  barres  ct  a  scctcurs  ainsi  que  mettre  vos  cn-tetcs  en  evidence  en  combinam  differents 
styles  de  caractcrcs  en  plusicurs  taillcs.  Une  reproduction,  page  suivantc.  illustre  cette 
fonction.  Avec  GSX.  vous  pouvez  recevoir  vos  donnees  sur  ecran.  imprimante  ou  table 
tracante. 

GSX  employe  seul  ne  permet  pas  de  dessiner  des  graphiques.  pas  plus  que  CP/M  ne  peut 
effectucr  du  traitcment  de  texte  sans  programme  d'application  specifique.  L'exemple 
fourni  a  ete  obtenu  a  partir  du  programme  «  DR  Graph  »  de  Digital  Research.  GSX, 
pour  sa  part,  apportc  les  lb  net  ions  dc  gestion  d 'ecran.  d 'imprimante  et  de  table  tracante 
permettant  de  deplacer  les  programmes  d'un  ordinateur  a  l'autre  en  reduisant  au  mini- 
mum ies  procedures  de  reinstallation. 

Pour  creer  une  disquettc  adaptee  a  1'exploitation  de  programmes  GSX.  copiez,  a  partir 
de  la  face  3  dc  la  disquette  systeme.  les  fichiers  GSX. SYS.  ASSIGN, SYS  et  les  gestion- 
naires  de  periphcrique  (ainsi  que  le  programme  d'application  lui-meme)  sur  une  disquette 
vierge  forma  tec.  Le  fichier  ASSlGN-SYS  contient  un  «  cocktail  »  d'un  maximum  de 
trois  gestionnaires  de  peripheriques  de  sortie,  classes  par  taille  decroissante: 

21a:ddf>;lr7  imprimante  Epson  7  bit 

llaiddhD7470  liable  tracante 

8ia;ddmode2  :ecran  en  mode  2 

82a:ddmodel  ;ecran  en  mode  1 

03a:  dd(node0  ;ecran  en  mode  0 

Les  nombres  indiquent  au  GSX  le  type  de  chaque  gestionnaire  de  periphertque  (impri- 
mante/table  tracante -ecran).  Les  gestionnaires  ne  peuvent  etre  charges  qu'un  par  un  dans 
la  meme  zone  memoire.  e'est  pourquoi  GSX  doit  commencer  par  le  plus  important  pour 
pouvoir  allouer  un  espace  memoire  suffisant. 

Une  selection  de  gestionnaires  est  disponible  pour  les  differents  modes  ecran  du  6128  et 
pour  les  imprimantes  standard.  Le  fichier  DRIVERS. GSX  contient  un  recapitulatif  des 
gestionnaires  fournis  avee  le  6128.  Vous  devez  le  consulter  en  inserant.  la  face  3  dc  la  dis- 
quette systeme  el  en  tapant  a  la  suite  du  message  A  > : 

TYPE  DRIVERS. GSX 

afm  de  selectionner  les  gestionnaires  de  peripherique  appropries. 

La  plupart  des  programmes  d'application  comportent  un  chargeur  de  GSX:  il  vous  suffit 
done  dc  taper  le  nom  du  programme  a  la  suite  de  A  >  .  Si  votre  application  ne  possede 
pas  de  chargeur  dc  GSX  installe.  copiez  le  fichier  GENGRAF.COM  (face  3  d'une  des 
disquettes  systeme)  sur  votre  disquette  de  travail  sous  GSX  et  tapez: 

GEN6RAF  TONFICHI 

YOURFILE.COM  etant  ici  1'application  non  installcc.  Lc  fichier  GENGRAF.COM 
pourra  alors  clrc  efface  (commande  ERA),  puisquc  Y0URFILE.COM  est  desormais 
muni  du  chargeur  dc  GSX. 
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Graphique  de  demonstration 
Budget  de  Ken 


fill  2  108.80 


fill   7  158.00 

-Fill  4  100.00 

•Fill   5  50.00 


108.00  fill   1 


108.80  -Fill  0 


100.00  -Fill  3 


100.00  -Fill  6 


Excmplc  dc  graphique  a  secteurs  imprimc  a  partir  de  GSX 

Exploitation  sous  CP/M2.2 

Conlrairement  au  CP/MPlus,  le  CP/M2.2  (version  precedente  du  systeme  d'exploitation 
CP/M),  tres  rigoureux  quant  aux  changemcnts  de  disquettes,  exige  sou  vent  le  recharge- 
ment  de  certaines  parlies  du  systeme  d'exploitation  a  partir  d'une  disquette  systeme  inse- 
ree  dans  I'uniteA.  surtout  a  la  fin  de  1'exploitation  d'un  programme,  lorsque  A  >  reappa- 
rait  a  1'ecran.  Si  vous  ne  possedez  qu'une  seule  unite  de  disquette.  vous  devez  utiliser 
FILECOPY  a  la  place  de  PIP  pour  copier  vos  fichiers. 

L'emploi  du  CP/M2.2  doit  se  limiter  aux  logiciels  tournant  sur  les  ordinateurs 
AMSTRAD  CPC664  el  CPC464  +  DDI I ,  uniquement  dans  le  cas  oii  ceux-ci  ne  sont  pas 
compatibles  avec  le  CP/MPlus. 


ATTENTION :  Certains  logiciels  d'application  fonctionnant  sous  CP/M2.2,  sur 
CPC464  et  CPC464/DDF1,  contiennent  des  instructions  d'installation  specifiques  et 
ne  peuvent  pas  s'exploiter  sous  CP/MPlus.  Dans  ces  cas  la,  vous  devrez  faire  appel  au 
systeme  CP/M2.2  residant  sur  la  face  4  d'une  des  disquettes  systeme. 
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Partie  2  :  Les  cassettes 


Lorsque  vous  connectez  un  lecteur  de  cassettes  au  systeme  (voir  la  partie  2  du  Cours  Ele- 
mentaire),  un  certain  nombre  de  commandes  BASIC  fonctionnent  differemment  apres 
Fentree  de  la  commande  I  TAPE.  Cette  instruction  configure  fordinateur  pour  une  utili- 
sation avec  cassettes  et  les  messages  apparaissant  a  l'ecran  sonl  alors  differents  de  ceux 
vus  lors  de  1'exploitation  des  disquettes. 

REMARQUE:  Si  les  commandes  ENROULEMENT  RAPIDE  et  RETOUR 
ARRIERE  de  votre  lecteur  sont  sous  telecommande,  vous  devez  -  pour  ces  operations  - 

retirer  la  fiche  REM  de  votre  lecteur  (telecommande)  ou  taper  !  TAPE:CAT  pour  activer 
le  moleur  du  lecteur.  Appuyez  sur  [ESC]  pour  revenir  au  mode  telecommande. 

Contraircmcnt  aux  noms  de  fichiers  sur  disquettes,  les  noms  de  fichiers  sur  cassettes 
n'obeissent  pas  a  des  regies  trcs  strictes  quant  a  leur  forme.  lis  pcuvent  comporter  jusqu'a 

16  caracteres  incluant  des  cspaccs  et  des  signes  dc  ponctuation,  ou  peuvent  meme  etre 
omis. 

La  liste  ci-apres  decrit  les  DIFFERENCES  de  fonctionnement  de  ces  commandes 
BASIC.  Les  commandes  elles-memes  sont  decrites  dans  1c  chapitre  «  Liste  complete  des 
mots  cles  du  BASIC  AMSTRAD  CPC6128  »>. 

CAT 

Le  message  ci-dessous  apparait : 

Press  PLAY  Then  any  key: 

Vous  devez  alors  appuyer  sur  le  bouton  PLAY  de  votre  lecteur  de  cassette  puis  sur  1'une 
des  touches  de  fordinateur.  La  cassette  commence  a  se  derouler  et  fordinateur  charge  le 

fichier  a  traiter. 

Chacun  des  blocs  constituant  un  fichier  va  s'afficher,  suivi  d'un  caractere  definissant  son 
type: 

5  fichier  BASIC  standard 
%  fichier  BASIC  protege 
*  fichier  ASCII 

6  fichier  binairc 

L'ordinateur  afflche : 

Ok 

...a  la  fin  de  la  ligne  si  la  lecture  du  fichier  a  abouti,  indiquant  qu'un  chargement  du  fichier 
aurait  cte  cfTcctuc  avec  succes  si  la  commande  adequate  avail  ete  lancee. 

La  fonction  CAT  n"agit  pas  sur  le  programme  en  cours  stocke  dans  la  memoire. 
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Si  un  fichier  sur  cassette  est  sauvegarde  sans  specification  de  nom,  CAT  Paffiche  corame  : 

Unna»ed  file 
Pour  arreter  CAT,  appuyez  sur  la  touche  [ESC]. 

Erreurs  de  lecture 

Si  le  message  ci-dessus  indiquant  la  lecture  du  fichier  n'apparait  pas,  ou  si  vous  obtenez  : 
Read   error  a 

...  ou 

Read   error  b 
Cela  signifie  que  : 

1 .  Votre  lecteur  de  cassettes  n'est  pas  correctement  connecte  a  la  prise  TAPE  de  l'ordina- 
teur  (voir  alors  la  partie  2  du  Cours  Elemcntaire). 

2.  Les  commandes  VOLUME  ou  LEVEL  de  votre  lecteur  de  cassette  ne  sont  pas  bien 

reglees. 

3.  La  cassette  est  de  mauvaise  qualite  ou  usagee. 

4.  La  cassette  a  ete  soumise  a  un  champ  magnetique  provenant  d'un  haut-parleur,  d'un 
teieviseur,  ou  d'une  autre  source. 

5.  Le  type  de  votre  cassette  ne  convient  pas  aux  systemes  informatiques  AMSTRAD. 

CHAIN 

CHAIN  MERGE 
LOAD 
MERGE 
RUN 

Vous  n'avez  pas  a  specifier  de  nom  de  fichier  si  vous  desirez  charger  le  premier  fichier  de 
la  cassette.  Exemples  de  commandes : 

!     CHAIN   "" 

!  ■    CHAIN   "",100 

CHAIN  MERGE  "" 

CHAIN  MER6E  "",100 

CHAIN  MERGE  "", 1 00, DELETE  30-70 
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LOAD  "" 

LOAD  IM,,UF40 

MERGE  "" 

run  » "    (En  maintenant  la  touche  [CONTROL]  et  en  appuyant  sur  la  touche 

[ENTER]  du  clavier  numerique,  vous  executez  cette  commande.  S'em- 
ploie  avec  les  Iogiciels  sur  cassette  apres  l'entree  de  |  TAPE). 

Le  BASIC  vous  repond  : 

Press  PLftY  then  any  key: 

Vous  devez  alors  appuyer  sur  le  bouton  PLAY  de  votre  lecteur  de  cassettes  puis  sur  Tune 
des  touches  dc  I'ordinateur.  La  cassette  commence  a  se  derouler  et  Fordinateur  charge  le 
fichier  a  traiter. 

Les  messages  de  chargement  apparaissent  a  Fecran  : 

Loading  NQMFICH  block  1 

...  accompagnes  d'autant  de  nutneros  de  blocs  qu'en  contient  le  fichier. 

Si  le  nom  de  fichier. commence  par !,  les  messages  ci-dessus  sont  supprimes  et  vous  n'avez 
pas  a  actionner  de  touche  pour  charger  le  fichier  (assurez-vous  toutefois  que  le  bouton 
PLAY  de  votre  lecteur  de  cassette  est  bien  enfonce).  Si  vos  programmes  font  appel  au 
point  d'exclamation !  et  doivent  aussi  tourner  sur  disquette,  le !  est  ignore  lors  de 
Fexploitation  sur  disquette).  Le !  n'occupe  pas  un  caractere  dans  les  noms  de  fichiers  sur 
cassette  ou  disquette. 

A  Fabandon  de  cette  commande  par  la  touche  [ESC],  le  message  d'erreur  ci-dessous 

s'affiche  : 

Broken   in 

Si  le  chargement  du  fichier  n'a  pas  abouti,  reportez-vous  au  paragraphe  «  Erreurs  de  lec- 
ture,». 


ATTENTION :  L'interface  interne  de  la  disquette  occupe  une  petite  partie  de  la 
memoire  qui  dans  certains  cas  est  exploitee  par  les  programmeurs  professionnels  de 
Iogiciels  sur  cassette  destines  au  CPC464.  Ces  cassettes  ne  fonctionnent  pas  correcte- 
ment  sur  le  systemc  6128  +  lecteur  de  cassettes. 
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EOF 

pos  g  9) 

Ces  fonctions  operent  de  maniere  identique  sur  disquette  et  sur  cassette. 

INPUT  If  9 
LINE  INPUT  ji  9 
OPEN  IN  et  CLOSEIN 

Vous  n*avez  pas  a  specifier  de  nom  de  fichier  pour  charger  le  premier  fichier  sur  cassette. 
Exemple  de  commande  : 

OPENIN    "" 
Vous  obtenez  le  message  :  y 

Press  PLAY  then  any  keys 

Vous  devez  aJors  appuyer  sur  le  bouton  PLAY  de  votre  lecteur  de  cassettes  puis  sur  Tunc 
des  touches  grises  de  Pordinateur.  La  bande  commence  a  se  derouler  ct  Pordinateur 
charge  les  2  premiers  Koctets  du  fichier  dans  la  zone  memoire  appelee  « tampon  de 
fichiers  ».  Les  informations  sont  entrees  jusqu' a  cc  que  le  tampon  soit  vide.  L'ordinateur 
envoie  alors  a  nouveau  un  message  : 

Press  PLAY  then  any   key: 
...puis  charge  les  2  Koctets  suivants. 

Les  messages  de  chargement  s'affichenl : 
Loading  NOMFICH  block   1 

...ainsi  que  les  autres  numeros  de  bloc,  au  fur  et  a  mesure  du  chargement. 

Si  le  premier  caractere  du  nom  de  fichier  dans  la  commande  OP  EN  IN  est  un  point 
d'exclamation  (!),  les  messages  ci-dessus  sont  supprimes ;  vous  n'avez  a  appuyer  sur 
aucune  touchc  pour  charger  le  fichier.  (Vous  devez  alors  vous  assurer  que  le  bouton 
PLAY  de  votre  lecteur  de  cassette  est  bien  enfonce).  Si  vos  programmes  font  appe!  au 
signe  !  et  doivcnt  cgalement  fonctionner  sur  disquette,  le  !  est  ignore  lors  de  Pexploitalion 
de  la  disquette  (au  cours  de  la  lecture  du  nom  de  fichier  sur  disquette).  Le  !  n'occupe  pas 
de  caractere  dans  les  noms  de  fichiers  sur  disquette  ou  cassette. 

Lorsque  vous  interrompez  Pentree  du  fichier  a  Paide  de  la  louche  [ESC],  le  message  sui- 
vant  s'affiche : 

Broken   in 

Si  le  chargement  du  fichier  n'a  pas  abouti,  consultez  le  paragraphe  anterieur  «  Erreurs  de 
lecture  ». 
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LIST  4  9 

OPENOUT  et  CLOSEOUT 

PRINT  $  9 

WRITE  ft  9 

Si  vous  desirez  sauvegarder  un  fichier  sans  nom,  vous  n'avez  pas  a  en  specifier  le  nom. 

Exemple  dc  commande : 

OPENOUT    "" 

Les  premiers  2  Koctets  du  fichier  a  sauvegarder  vont  s'inscrire  dans  la  partie  de  la 
memoire  appelee  « tampon  de  fichiers  ».  Lorsque  ce  tampon  est  plein,  le  message  ci- 
dessous  apparait : 

Press  REC  and  PLAY  thtn  any  keys 

Vous  devez  alors  appuyer  sur  les  boutons  RECORD  et  PLAY  de  votre  lecteur  de  casset- 
tes puis  sur  l'une  des  touches  de  1'ordinateur.  La  bande  se  deroule  et  I'ordinateur  sauve- 
garde  le  contenu  du  tampon.  L'ordinateur  remplit  ensuite  a  nouveau  le  tampon,  avec  les 
2  Ko  suivants  puis  envoie  le  message : 

Press  REC  and  PLAY  then  any  key: 
Les  2  Ko  suivants  sont  alors  sauvegardes  sur  la  cassette. 

Si  le  tampon  est  partiellement  plein  et  que  la  commande  CLOSEOUT  intervient,  I'ordi- 
nateur sauvegarde  sur  la  cassette  ce  qui  reste  dans  le  tampon,  affichant  le  message : 

Press  REC  and  PLAY  then  any  keys 

Le  message  de  sauvegarde  s'affiche  : 
Saving   NOMFICH  block  <x 

Si  le  nom  de  fichier  de  la  commande  OPENOUT  commence  par !,  les  messages ci-desso us 
n'apparaissent  pas  et  vous  n'avez  a  appuyer  sur  aucune  touche  pour  sauvegarder  le 
fichier.  (Vous  devez  alors  vous  assurer  que  les  boutons  RECORD  et  PLAY  de  votre  lec- 
teur sont  bien  enfonces).  Si  vos  programmes  font  appel  a  !  et  doivent  aussi  etre  exploites 
sur  disquctte,  le  !  est  ignore  lors  de  l'exploitation  de  la  disquette  (pendant  la  lecture  du 
nom  de  fichier  sur  disquette).  Le  !  n'occupe  pas  de  caractere  dans  les  noms  de  fichiers  sur 
disquette  ou  cassette. 

Lorsque  vous  interrompez  la  sortie  des  fichiers  en  appuyant  sur  [ESC],  le  message  d'er- 
reur  ci-dessous  apparait : 

Broken    in 
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Pour  reussir  une  sauvegarde... 

1.  Verifiez  que  votre  lecteur  de  cassettes  est  bien  connecte  a  la  prise  TAPE  de  l'ordinateur 
(voir  la  partie  2  du  Cours  elementaire). 

2.  Verifiez  que  les  commandes  RECORD  et  LEVEL  de  votre  lecteur  sont  correctement 
reglees. 

3.  Verifiez  que  vos  cassettes  ne  sont  pas  de  mauvaise  qualite  ou  de  120  ran  (C120).  II  est 
preferable  d'utiliser  des  cassettes  AMSOFT  Ct5. 

4.  N'exposez  vos  cassettes  a  aucun  champ  magnetique :  haut-parleurs,  televiseur,  etc... 

5.  Avant  de  detruire  un  programme  de  la  memoire  apres  sauvegarde,  assurez-vous,  par 
la  commande  CATalog,  que  la  sauvegarde  a  effectivement  abouti. 

6.  Veillez  a  Pentretien  regulier  de  votre  lecteur  de  cassettes  et  a  la  proprete  des  tetes  de 
lecture. 


SAVE 

Si  vous  desirez  sauvegarder  un  programme  comme  fichier  sans  nom,  vous  n'avez  pas  a 
specifier  de  nom  de  fichier.  Exemple  de  commande : 

SAVE   "" 

Le  message  ci-dessous  s'affiche  : 

Press  REC  and  PLAY  then  any  key: 

Vous  devez  alors  appuyer  sur  les  boutons  RECORD  et  PLAY  de  votre  lecteur  de  casset- 
tes puis  sur  Tune  des  touches  de  votre  ordinateur.  La  bande  se  derouie  et  l'ordinateur 
sauvegarde  le  programme. 

Les  messages  de  sauvegarde  apparaissent : 
Saving   NQMFICH  block    1 

...accompagnes  d'autant  de  numeros  de  blocs  que  le  fichier  en  contient,  jusqu'a  la  fin  de 
la  sauvegarde. 


Chapitre  4    Page  1 6  Utilisation  des  disquettes  et  des  cassettes 


Si  le  nom  de  fichier  commence  par !,  les  messages  ci-dessus  n'apparaissent  pas  et  vous 
n'avez  a  appuyer  sur  aucune  touchc  pour  sauvegarder  le  fichier.  (Vous  devez  alors  vous 
assurer  que  les  boutons  RECORD  el  PLAY  de  voire  lecteur  sont  bien  en[bnces).  Si  vos 
programmes  font  appel  a  !  et  doivent  aussi  etre  exploites  sur  disquetle,  le  !  est  ignore  ors 
de  Texploitation  de  la  disquette  (pendant  la  lecture  du  nom  de  fichier  sur  disquette).  Le  ! 
n'occupe  pas  de  caractere  dans  les  noms  de  fichiers  sur  disquette  ou  cassette. 

Lorsque  vous  interrompez  cette  commande  a  I'aide  de  la  louche  [ESC],  le  message  d'er- 

reur  ci-dessous  s'affiche  : 

Broken    in 
Reportez-vous  au  paragraphe  «  Pour  reussir  une  sauvegarde  »  plus  haut  dans  ce  chapitre. 

SPEED  WRITE 

Cette  commande  ne  fonctionne  que  sur  cassette  et  peut  etre  exploitee  lorsque  l'ordinateur 
fonctionne  sur  disquette. 

Messages  d'erreur 

Les  messages  d'erreur  7,  21,  24.  25,  27  et  32  (voir  partie  6  du  chapitre  «"Pour  informa- 
tion »)  s'affichent.  le  cas  echeant,  lors  du  fonctionnement  sur  cassette. 

Commandes  externes  de  FAMSDOS 

Les  commandes  ci-dessous  permettent  d'acheminer  les  entrees/sorties  vers  la  disquette  ou 

la  cassette : 

|  TAPE  (pouvant  se  subdiviser  en  |  TAPE.IN  ct  '  TAPE  OUT) 
|  DISC  (pouvant  se  subdiviser  en    DISC. IN  ct  I  DISCOUT) 

Toutes  les  commandes  externes : 

1ft 
IB 

ICPM 
iDIft 
I  DRIVE 
1ERA 
I  REN 
IUSER 

...sont  exploiter  sur  disquette  meme  si  le  fonctionnement  sur  cassette  a  ete  selections. 
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Chapitre  5 

Les  elements  de  1»  AMSDOS  et  du  CP/M 


Partie  1 :  AMSDOS 


Sujets  abordes : 

*  Introduction  a  AMSDOS 

*  Le  catalogue  de  la  disquette 

*  Changement  des  disquettes 

*  Noms  ct  genres  des  fichiers  AMSDOS 

*  Les  en-tetes  des  fichiers  AMSDOS 

*  Noms  de  fichiers  avec  deux  unites 

*  Les  jokers  _ 

*  Un  exemple  de  programme  constitue  de  commandes  AMSDOS 

*  Recapitulatif  des  commandes  d'AMSDOS 

*  Copie  de  fichiers 

*  Guide  de  reference  des  messages  d'erreur 


Introduction 

AMSDOS  est  une  extension  du  BASIC  AMSTRAD  de  votre  ordinateur,  ajoutant  des 
commandes  extemes  supplementaires  et  redefmissant  certaines  instructions  existantes. 

Les  nouvelles  commandes  externes  sont  identifiees  par  le  symbole  !  (barre). 

AMSDOS  permet  a  I'utilisateur  de  changer  librement  de  disquette  (a  condition  toutefois 
qu'il  n'y  ait  pas  de  fichiers  ouverts  en  ecriture,  auquel  cas  un  message  d'erreur  apparait). 
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Le  catalogue  de  la  disquette 

Chaque  disquette  est  divisee  en  2  parties,  une  pour  le  catalogue  et  une  pour  les  donnees. 
Le  catalogue  est  la  liste  des  noms  de  fichiers  que  conlienl  la  disquette,  accompagnee  d'un 
'plan'  de  leur  positionnement  sur  !a  disquette.  AMSDOS  et  CP/M  peuvent  calculer  la 
taille  de  chaque  fichier  apres  consultation  de  cette  position  dans  le  catalogue.  Le  calcul 
de  l'espace  disponible  se  fait  par  l'addition  des  fichiers  existants  puis  la  soustraction  du 
resultat  de  l'espace  disponible  du  total. 

Chaque  fois  qu'un  fichier  est  lu,  il  y  a  d'abord  examen  de  sa  position  dans  1c  catalogue, 
determinant  son  emplacement  sur  la  disquette.  Lorsqu'un  nouveau  fichier  est  crce,  un 
espace  vacant  lui  est  attribue.  Une  fois  efface,  cet  espace  est  libere.  Le  catalogue  compta- 
bilise  par  unite  de  IK  (un  kilo-octet)  et  peut  contenir  jusqu'a  64  positions  differentes,  Les 
longs  fichiers  sont  dotes  d'une  position  pour  chaque  groupe  de  I6K  utilise,  cette 
manoeuvre  n'apparaissant  normalement  pas  a  1'utilisateur. 


Changement  des  disquettes 

AMSDOS  et  CP/M  Plus  vous  permettent  de  remplacer  ou  de  retirer  une  disquette  a  tout 
moment,  en  dehors  des  temps  d'acces  et  si  aucun  fichier  n'est  ouvcrt  sur  runitc  concemee. 
Contrairement  a  CP/M  2.2.  AMSDOS  autorisc  ccttc  operation  sans  procedure  d'entree 
dans  la  disquette. 

Remplacer  une  disquette  en  cours  d'ecriture  risque  d'endommager  les  donnees  qu'elle 
contient.  Lorsque  vous  remplacez  une  disquette  contenant  des  fichiers  ouverts,  ceux-ci 
sont  «  abandonnes  »  des  qu'AMSDOS  detecte  le  remplacemcnt  ct  un  message  d'erreur 
s'affiche.  Toutes  les  donnees  a  venir  sont  alors  perdues  el  la  derniere  position  dans  le  cata- 
logue ne  s'inscrit  pas  sur  la  disquette.  AMSDOS  ne  detecte  le  remplacement  qu'en  lisant 
le  catalogue,  e'est-a-dire  tous  les  16K  du  fichier  (ou  lors  de  toute  ouvertnre  ou  fermeture 
d'un  fichier).  Vous  risquez  ainsi  de  perdre  16K  de  donnees  lorsque  vous  remplacez  une 
disquette  contenant  des  fichiers  ouverts. 

Noms  et  genres  des  fichiers  AMSDOS 

II  est  d'usage  d'ajouter  une  extension  aux  noms  des  fichiers  disques.  Cette  extension,  sim- 
ple convention  indiquant  le  type  du  fichier,  ne  joue  aucun  role  precis.  Certains  program- 
mes n'acceptent  toutefois  un  fichier  que  suivi  d'une  extension  particuliere.  AMSDOS 
admet  n'importe  quel  type  de  nom  mais  cherche  de  preference  les  fichiers  d'un  certain 
type,  sauf  specification  particuliere.  (Voir  «  Les  en-tetes  des  fichiers  AMSDOS  »). 
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Construction  des  noms  de  fichiers 

Le  nom  est  constitue  de  deux  parties  separees  par  un  point,  la  premiere  partie  de  8  lettres 
maximum  et  la  seconde,  de  3.  Ainsi,  «  ROINTIME.DEM  »».  «  DISC.BAS  »  et  «  DISCKIT. 
COM  »  sont  des  noms  dc  fichiers  corrects. 

La  deuxieme  partie  represente  I'indicateur  de  type.  Lcs  noms  de  fichiers  et  leurs  indica- 
teurs  peuvent  elre  composes  d'un  melange  de  lettres  et  de  nombres  mais  ne  peuvent  conte- 
nir  ni  espaces  blancs,  ni  signes  de  ponctuation.  Les  indicateurs  les  plus  communs  sont : 

.<espace>  Type  non  specific.  Peut  etre  un  fichier  de  donnees  cree  par  1"  instruction 
OPENOUT  «  <nomfich>  » {nom  de  fichier)  ou  un  programme  BASIC  sau- 
vegarde  en  utilisant  une  commande  AMSDOS  du  style  SAVE 
«  <nomfich>  »,A. 

.BAS  Programme  BASIC  sauvegarde  a  I'aide  de  commandes  AMSDOS  du  style 
SAVE  «  <nomfich>  ».P   ou  SAVE  «  <nomfich>.BAS  »,A. 

.  BIN  Programme  ou  zone  de  memoire  sauvegardee  par  une  commande  AMSDOS 

du  style  SAVE  «  <nomfich>  »,B  (<parametres  binaires>). 

.BAK  Ancienne  version  d'un  fichier  sauvegardee  lors  de  la  configuration  d'une  nou- 
velle  version  par  AMSDOS  ou  un  utilitaire.  L'utilisateur  est  ainsi  a  meme  de 
reutiliser  1'ancicnne  version  (BAcK-up)  si  besoin  est. 

.COM        C'est  une  commande.  Tous  lcs  utilitaircs  du  CP/M  onl  cette  extension. 
.SUB  Fichier  destruction  du  programme  SUBMIT  sous  CP/M. 


Les  en-tStes  des  fichiers  AMSDOS 

AMSDOS  dote  automatiquement  chaque  fichier  d'un  indicateur  de  type.  Si  les  indica- 
teurs (par  defaut)  ne  vous  satisfont  pas,  vous  avez  la  possibility  d'en  specifier  un  a  votre 
convenance.  L'indicateur  de  type  peut  correspondre  pour  le  systeme  a  un  certain  en-tete. 
Les  programmes  BASIC  AMSDOS,  les  programmes  compiles  et  les  fichiers  binaires  sont 
sauvegardes  sur  disquette  avec  un  en-tele  (le  meme  que  sur  une  cassette)  permettant  a  la 
commande  AMSDOS : 

LOAD  «  <nomfich>  » 

...de  les  reconnaitre  et  d'agir  en  consequence.  Si  LOAD  ne  trouve  pas  d 'en-tete,  il  consi- 
dere  avoir  affaire  a  un  fichier  en  codes  ASCII. 
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•..-•-* 
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Lors  du  chargement  d'un  fichier  depourvu  d'indicateur  de  type,  la  commande  LOAD 
AMSDOS,  independamment  du  conlenu  de  1'en-tete,  cherche  d'abord  ce  fichier  sous  ie 
type: 

.<espace> 

...puis,  si  elle  ne  trouve  rien : 

BAS 
...et  enfin : 

BIN 

L'utilisateur  a  ainsi  le  loisir  d'abreger  ses  noms  de  fichiers  en  omettant,  le  plus  souvent, 

de  specifier  Ie  type. 

Un  fichier  de  donnees  sur  disquette  rempli  apres  ouverture  a  l'aidc  de  la  commande 
OPENOUT,  n'aura  pas d'en-tete,  et  son contenu,  verm  descommandes  BASIC  WRITE, 
PRINT.  LIST,  sera  constitue  de  codes  ASCII.  En  l'absence  d'indicateur,  la  commande 

OPEN  IN  chcrchera  un  fichier  de  ce  type. 

Noms  de  fichiers  avec  deux  unites 

Dans  le  cas  d'un  systeme  a  deux  unites  de  diquettes,  une  FD-1  etant  connectee  a  1'ordina- 
teur,  les  fichiers  peuvent  se  trouver  sur  Tune  ou  l'autre  des  deux  unites.  L'ordinateur  n'al- 
lant'pas  chercher  sur  les  deux,  vous  devrez  specifier  1' unite  concernee.  Pour  cela,  vous 
dispose*  soit  de  I  A,  soit  de  |  B,  soit  encore  de  DRIVE  suivi  d'un  nom  de  fichier  normal. 
Vous  pouvez  supplanter  le  choix  de  1'unite  par  delaut  en  adjoignant  un  prefixe  (A:  ou  B:) 
au  nom. 


Ainsi 


IB 

SAVE    "PROG.BflS" 
!  A 


...et: 


SAVf.   "B:PR0G.BAS" 


...sauvegardent  le  programme  sur  1'unite  B. 
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De  meme,  vous  pouvez  supplanter  l'affectation  numero  USER  (les  numeros  d'utilisation 
permettent  le  decoupage  du  repertoire)  par  defaut  en  specifiant  un  numero  d'ulilisateur, 
compris  entre  0  et  15,  qui  servira  de  prefixe  au  nom  de  fichier.  Ainsi,  les  commandes : 

LOAD    "iSiPRDli.BAS" 


...et : 


SAVE    "15;PR0G,BA5" 


...chargent  et  sauvegardent  le  programme  sur  la  section  de  la  disquette  affectee  a  I'utilisa- 
teur  15,  quel  que  soit  le  numero  par  defaut  (voir  commande  I  USER,  dans  la  suite  du 
manucl). 

Enfin,  il  est  possible  de  supplanter  a  la  fois  la  valeur  par  defaut  de  l'utilisateur  (USER) 
et  cell'e  dc  r unite  (DRIVE)  (dans  cet  ordre)  en  les  indiquant  dans  le  prefixe  du  nom  de 

fichier,  comme  par  exemple  : 

RUN    "lSBiPROG.BAS" 

Les  jokers 

On  a  souvent  besoin  d'operer  (copic,  effacement,  etc.)  sur  plusieurs  fichiers  a  la  fois.  Lors- 
qu'un  nom  de  fichier  est  specifie  pour  telle  ou  telle  operation,  le  systeme  recherche  le  nom 
donnc  dans  le  catalogue.  II  est  possible  dans  certains  cas  de  demander  a  ce  que  1'operation 
soit  effectuec  sur  plusieurs  fichiers  ayant  des  lettres  communes,  les  autrcs  lettres  ctant 
alors  rcmplacees  par  des  ?  (signifiant  -ne  pas  tenir  compte  de')-  On  peut  abreger  une  serie 
de  ?  en  la  remplagant  par  le  symbole  *.  Ainsi,  FRED.*  est  le  raccourci  de  FRED.???  et 
F\B>AS  eclui  de  F???????.BAS. 

Dans  cet  esprit,  *.*  signifie  Vimporte  quel  fichier'. 


Exemples : 


Convient  a 

Convient  a 

Catalogue 

Convient  a  *.BAS 

FRED?.BAS 

F*.BAS 

BERT.  B  AS 

BERT.BAS 

FREDl.BAS 

FREDS. BAS 

FREDl.BAS 

FREDl.BAS 

FRF.D2.BAS 

FRED2.BAS 

FRED.BAS 

FRED2.BAS 

FRED3.BAK 

FRED3.BAK 

FRFD3.BAS 

FRED3.BAS 

FRED3.BAS 

FRED3.BAS 

FINAL.BAS 

FINAL.BAS 

FINAL.BAS 
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Exemples  d'utilisation  de  commandes  d'AMSDOS  dans  un  programme 

Pour  vous  aider  a  bien  comprendre  les  commandes  d'AMSDOS.  nous  vous  conseillons 
de  bien  regarder  ces  exemples  et  meme  de  revenir  sur  ccrtaincs  parties  au  moment  ou 
nous  nous  y  refererons  dans  la  suite  du  chapitre.  Ne  faites  pas  fonctionner  ces  program- 
mes avec  I' original  de  vos  disquettes  systeme  CP/M.  Utilisez  une  disquette  de  travail  ou 
une  copie  sur  lesquelles  ils  pourront  ecrire  en  toute  securite. 

Sauvegarde  de  variables  et  recopie  d'ecran 

Le  programme  ci-dessous  inscrit  des  donnees  sur  la  disquette ;  vous  devez  done  inserer 
dans  1'unite  une  disquette  vierge  ou  une  disquette  de  travail.  Le  programme  dessine  le 
chapeau  anglais  et  recopie  la  totalite  de  l'ecran  sur  la  disquette. 

10  dumpf  i  le*="f  lagdufflo.srii" 
20  MODE  1: BORDER  0 
313  DIM  colour!  2) 
40  FOR  1^0  TO  2 

50  READ  colour (j):  REM  tharae  les  No  de  couleurs  en  'DATA* 
60   INK  i. colour  (i) 
70  NEXT 

BB  ON  ERROR  GOTO  430 

90  OPEN  IN  "par  am.  da  t"  '  teste  si  le  fichier  exists 
100  CLOSEINsON  ERROR  GOTO  0 

110  IF  errnum=32  AND  DERR=146  THEN  CLS:G0T0  160  •'  le  Hchier 
n'existe  pas 
120  CURSOR  1 : P R I N f  "Do  yo>.>  want  to  overwrite  aid  Hie?  Y/N  " 

130  a$=INKEY*:0N  INSTRC  YN" ,  UPPER*  (  a*  t  >  GOTO  130,  150,  140:  GO 

TO  130 

140  PRINT  a*:PRINT  "Program  abandoned": END 

150  PRINT  a*:CURaOR  0 

160  LiPENOUl  "par  am. d at" 

1/0  WRITE  #9, durapt i le*, 1 :  REM  sauvegarde  le  nam  du  fichier  e 

t  son  mode 

180  FOR  i=0  TO  2 

190  WHITE  *9, colour d j  •  REM  sauvegarde  les  couleurs 

208  NEX  T  i 

210    LLOSttlUT 

m  cls 

2.50   qp-1: GRAPHICS   PEN   gp:w=125 

240    x=-&5:«=248:y=40a:b  =  -15B:iiQSUB   400 
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758  v  =  0:b  =  150:fiQSUB  400 

260  x  =  575:a=-240:y=400:b=-150:l3QSUB  400 

270  v=0:b=150{BOSUB  400 

280  gp-2:  GRAPHICS  PEN  i}p:w=40 

290  a=240:x--40:y=400:b=-i$0:BQSUB  400 

>00    f-i&i  v-0:b-i50:  BUSUB    400 

310    a  =  --240:x  =  640:  y  =  0:  b=  U.0:  GOSIIB   400 

320    x=600:y=480:b=-150!GOSUB    400 

iU    lift  I  BIN   0,  0,1T>6,  380,  0,400:  CI. G    1 

340  ORIGIN  0.0,0,640,  150,250:CLS  1 

350  ORIGIN  0,0,280,352,0.400:CLG  2 

360   ORIGIN    0,0,0,640, 168, 238iCLG    2 

370  SAVE   dumpHle*,b,&C000,&4080 

380  DATA  2,26,6 

390  END 

400  MOVE  x,y:DRAWR  a,b:DRANR  w,0:DRAWR  -a,-b 

418  MOVE  x+a/2+w/2,y+b/2:FILL  gp 

420  RETURN 

430   errnum=ERR:RE5Ur1E   NEXT 
run 


Les  indicateurs  .DAT  et  ,SRN  n'ont  d'autre  role  que  de  nous  rappeler  ce  que  contient  1e 
fichier.  Le  fichier  PARAM.DAT  contient  des  parametres  codes  en  ASCII,  done  sans  en- 
tete,  alors  que  FLAGDUMP.SRN  est  un  fichier  AMSDOS  en  code  binaire,  avec  en-tete. 

Vous  remarquerez  que  le  programme  essaie  d'abord  de  lire  le  fichier  PARAM  DAT  afin 
de  s'assurer  qu'il  existe  avant  d'y  inscrire  des  donnees.  S'il  n'existe  pas,  le  BASIC  signale 
une  erreur  qui  est  capturee  par  ie  programme  et  Pexecution  se  deroule  sans  interruption. 
S'il  existe,  le  programme  vous  propose  d'ecraser  le  fichier  existant. 

Les  particularity  de  l'eeran  que  Ton  va  copier,  (son  mode,  la  palette  de  couleurs  et  le  nom 
du  fichier  contenant  les  donnees)  sont  copiees  sur  un  fichier.  Void  qui  illustre  1'utilisation 
d'un  fichier  de  donnees  pour  la  sauvegarde  WRITE  des  variables  dans  un  programme 
(dumpflleS)  et  de  constantes  (1).  pour  reutilisation  dans  un  autre  programme. 
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Restitution  d'ecran 

Cet  exemplc  (EX2.BAS)  est  le  programme  type  de  restitution  d'une  copie  d'ecran  faisant 
appel  au  fichier  des  paramctres  pour  definir  son  action.  Vous  rcmarquerez  la  facon  d'ap- 
peler  (INPUT)  les  variables  se  trouvant  dans  un  fichier  avec  variation  automatique  dc  lon- 
gueur de  fichier  par  la  fonction  EOF  (End  Of  File  =  Fin  de  fichier).  II  est  important  de 
sauvegarder  les  parametres  de  l'ecran,  pour  eliminer  tout  risque  de  brouillage  des  resul- 
tats.  La  commande  MODE  et  le  blocage  du  defilement  continu  de  Pimage  accomplissent 
cette  sauvegarde. 

10  DIM  colour (15):  REM  provision  for  16  colours 

20  GPENIN  "paraffl.dat" 

30   INPUT  #9,Hlename*,screenfflQde 

40  i=0 

50  WHILE  NOT  EOF 

68  INPUT  #9,colour(i) 

70      INK   i.coIourU) 

80  i=i+l 

90  WEND 

100  CLQSEIN 

110  MODE  screenfflode:BORDER  0 

120  LOAD  filename* 

run 

Sommaire  des  commandes  externes  d'AMSDOS 

IA 

!A 

COMMANDE :  Dirige  les  entrees/sorties  vers  l'unite  A.  Equivalent  a  |  DRIVE  avec  A 
pour  parametre.  (L'unite  integree  est  1'unite  A.) 

IB 

B 

COMMANDE  :  Dirige  les  entrees/sorties  vers  l'unite  B.  Equivaut  a  |  DRIVE  avec  B  pour 
parametre.  (L'unite  integree  est  l'unite  A.) 
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I  CPM 

I  CPM  -  *':.-'--■■       -'■  -!i:fi;' 

COMMANDE :  Charge  et  initialise  le  systeme  Sexploitation  contenu  dans  la  disquette 

systeme.  Les  systemes  fournis  avec  I'ordinateur  sont  les  CP/M  2.2  et  CP/M  Plus. 

Cette  operation  echouc  si  Tunite  ne  contient  pas  de  disquette  systeme.  La  copie  de  la 
face  1  charge  CP/M  Plus  et  celle  de  la  face  4,  CP/M  2.2. 

]DIR 

I  DIR  [,<chamealphanumerique>] 

IDIR.M.BAS"  ,,,.     . 


COMMANDE  :  Affiche  le  catalogue  de  la  disquette  (facon  CP/M)  et  l'espace  disponible. 
L'absence  de  la  chaine  equivaut  a  *.*. 


|  DISC 

I  DISC 

COMMANDE :  Equivaut  aux  commandes  I  DISC. IN  et  |  DISC. OUT  reunies. 

|  DISC.IN 

I  DISC.IN 

COMMANDE  :  Force  la  lecture  des  donnees  de  la  disquette. 

|  DISC.OUT 
DISC. OUT 

COMMANDE  :  Force  l'ecriture  sur  la  disquette. 
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I  DRIVE 

1  DRIVE,<chame  alphanumeriquo 

!DR1V£,"A" 

COMMANDE :  Designe une des  unites.  Cette  commande avorte si  AMSDOS est  incapa- 
ble de  lire  la  disquette  dans  1'unite  designee. 

|  ERA 

I  ERA,  <chame  alphanumeriquo 

!ERA,U*.BAK" 

COMMANDE :  Efface  tous  les  fichiers  qui  correspondent  a  ce  nom  de  fichier  et  ne  sont 

pas  en  Ecriture  seulement.  Les  jockers  sont  permis. 


I  REN  ^Wl 

|  REN,<chame  alphanumeriquo,  <chame  alphanumeriquo 

!REN,"NOUVEAU.BAS","ANCIEN.BAS" 

COMMANDE  :  Donne  un  nouveau  nom  de  fichier.  II  ne  doit  pas  exister  de  fichier  por- 
tant  deja  ce  nom.  Les  jockers  ne  sont  pas  autorises. 

Le  parametre  USER  (voir  |  USER)  peut  etre  specifie  dans  la  <chaine  alphanumeriquo 
pour  supplanter  toutes  les  valeurs  par  defaut.  Ainsi,  la  commande  I  REN,«0:NOU- 
VEAU.BAS  »,«15:ANCIEN.BAS»  rebaptise  le  fichier  de  I'utilisateur  15, 
«  ANCIEN  BAS  »,  et  l'appelle  «  NOUVEAU. BAS  »  en  raffectant  a  I'utilisateur  0, 
sans  tenir  comptedes  valeurs  par  defaut  ou  definies  precedemment. 

|  TAPE 
|  TAPE 

COMMANDE :  Equivaut  auxcommandes  |  TAPE.1N  et  |  TAPE.OUT  reunies.  Utilisee 
dans  le  cas  ou  un  lecteur  de  cassettes  est  raccorde  a  I'ordinateur. 
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I  TAPE.IN 

ITAPE.IN  "'  "'"';:  ""'  ;:" 

COMM  ANDE :  Lit  des  donnees  sur  un  lecteur  de  cassettes  connecte  a  l'ordinateur. 

|  TAPE.OUT 

I  TAPE.OUT 

COMM  ANDE :  Envoie  des  donnees  vers  un  lecteur  de  cassettes  connecte  a  l'ordinateur. 

|  USER 

I  USER,<nombreentier> 

! USER, 3 

COMMANDE :  Determine  la  section  du  catalogue  (comprise  entre  0  et  15)  sur  laquelle 

vont  s'effectuer  les  acces  disque. 

Un  fichier  peut  etre  transfere  d'un  mimero  d'utilisateur  a  I'autrc,  a  1'aide  d'un  |  REN. 
Ainsi,  I  REN,«  15:EXEMPLE.BAS  »,«  0:EXEMPLE.BAS  »  transfere  un  fichier  de 
l'utilisateur  0  a  l'utilisateur  15,  sans  modifier  le  nom  du  fichier  (EXEMPLE.BAS). 

Copie  de  fichiers  entre  disquettes 

Fichiers  AMSDOS  a  en-tete 

II  est  possible  de  copier  ces  fichiers  sous  CP/M,  en  utilisant  PIP  (voir  ce  chap.tre  partie  2) 
N'importe  quel  fichier  cree  sous  AMSDOS  comporte  une  zone  d  en-tete  voir  <  Les  en 
tetes  d'AMSDOS  »)  et  peut  etre  copie  integralement,  de  d.squette  a  ^quette  et  de  cas- 
sette a  disquette  -  toutefois.  son  contenu  est  en  general  incomprehensible  par  CP,M. 

Fichiers  ASCII 

Les  fichiers  crees  sous  AMSDOS  sans  zone  d'en-tete  sont  generalement  ecrits  en  codes 
ASCII  et  sont  compris  par  AMSDOS  et  CP/M.  lis  peuvent  done  s'echanger  hbrement 
entre  AMSDOS  et  CP/M. 
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Fichiers  en  lecture  settlement 

CP/M  permet  de  limiter  i'acces  a  un  fichier  en  lecture  seulement,  et/ou  selon  son  etat  dans 
le  catalogue.  De  tels  attributs  sont  accordes  et  supprimes  par  CP/M  tout  en  etant  respec- 
tes  par  AMSDOS.  Pour  plus  de  details,  voir  la  partie  2  de  ce  chapitre  (utilitaire  SET). 

Copie  de  fichiers  entre  disquettes  et  cassettes 

Le  CP/M  Plus  ne  permet  pas  la  copie  de  fichiers  entre  disquettes  et  cassettes.  Vous  devez 
pour  cela  faire  appel  au  CP/M  2.2  (face  4  d'une  des  disquettes  systeme).  Les  utilitaires 
CLOAD  et  SAVE  du  CP/M  2.2  vous  permettront  d'effectuer  ce  type  de  copie  (reportez- 
vous  aux  tableaux  pour  leur  utilisation). 

Les  procedures  de  copie  de  fichiers  g  : 

Les  tableaux  qui  suivent  montrent  la  facon  de  copier  n'importe  quel  fichier  entre  disquet- 
tes et  cassettes  (le  cas  echeant).  lis  sont  destines  a  un  systeme  a  une  seule  unite.  II  est 
absolument  impossible  de  copier  un  programme  BASIC  protege  ou  un  fichier  binaire  (un 
jeu  ecrit  en  langage  machine,  par  exemplc)  en  provenance  et  a  destination  d'une  cassette 
si  les  adresses  de  chargement  sont  inconnues.  Vous  trouverez  plus  de  details  sur  PIP, 
CLOAD  et  CSAVE  a  la  partie  2  de  ce  chapitre. 

Voir  les  tableaux  des  deux  pages  suivantes. 
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COPIE  DE  : 

BASIC  AMSTRAD 

Donnees  ASCII     Binaire 

COP  IE  SUfi  ! 

sur  cassette  t 

sur  cassette*     sur  cassette! 

BASIC  AMSTRAD 

ITAPE 

LOAD  "FICHIER" 
<changer  c»ssettt> 
SAVE  "FICHIER" 

i  DISC 

Binairt 

H*HIMEM 

sur  cassette* 

ITAPE 
MEMORY  <d>-l 

LOAD  "FICHIER" 

<changer  cassette 

SAVE  "FICHIER", B, 

<d>,<l>,[,rl 

IDISC 

MEMORY  H 

<note) 

) 

inserez  la  disquette  CP/M  2.2 

ASCII 

ITAPE 

ICPM 

sur  cassette! 

LOAD  "FICHIER" 
<changer  cassette> 
SAVE  "FICHIER". A 

CLOAD  "FICHIER", TEMP 
<changer  cassette> 

CSAVE  TEMP,"F1CHIER" 

IDISC 

ERA  TEMP 
AMSDOS 
<note  1> 

BASIC  AMSTRAD 

ITAPE 

sur 

LOAD  "FICHIER" 

di  squette 

IDISC 

SAVE  "FICHIER" 

inserez  la  disquette 

CP/M  2.2 

ASCII 

ITAPE 

ICPM 

sur  disquette 

LOAD  "FICHIER" 

IDISC 

SAVE  "FICHIER", A 

CLOAD  "FICHIER" 
AMSDOS 

Binaire 

H*HIMEM 

sur 

ITAPE 

disquette  * 

MEMORY  <d>-l 
LOAD  "FICHIER" 
IDISC 

SAVE  "FICHIER", B, 
,,,             <d>,<l>,[,<r>] 
-.  -flit  wrv-.  ...:     MEMORY  H 

<  n  o  t  e 

2> 

.  — >  - ._,.  fe» 
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COPtf  SUR  : 


BASIC  AHSTRA0  LOAD  "FICHIER- 


*ur  catiettel 


Binaire 


ASCII 

5  u  r  l a 55 et t el 


COPIE  DC  : 

&ASIC      Donnees      Binaire  Autre? 

AHSTRAD  %ur     ASCII  iur    AflSOQS  5ur 

disquettel   tfisquettt  *ur  disquette*  disquette 


TAFE 
SAVE  "FICHIER" 
IDISC 


H'HIKEri 
HEN0RV  <d.--l 
LOAD  "FICHIER" 
I  TAPE 

SAVE  "FICKER-.I 
'«>,' i i,i .rl 
DISC 
MEMORY  H 

•:n;>tc  2; 


inserer    la   duquette   CPM/2.2 


LOAD  "FICHIER* 
IIAPE 

3AUE  "FICHIER" 
;DISC 
ou  inserez  disc. 

ICPrl 

CSAVE  FICHIER 

AMSDOS 


BASIC    ARSlRfiil  LOAD    "FICHIER" 


iCPM 

CSAVE  FICHIER 

AflSDOS 


5l:T 

d  t  squette 


ASCII 


''changer  di$quette> 
j  SAVE  "FICHIER" 
<uu  inserp2  disq. 
iCR.'H  PLUS 
i   :CFM 

!  FIP  Bs-FICHIER 
!  AMSDOS 

\   LOAD  "FICHIER" 
changer  disq. 


:CPM 

CSAVE  FICHIER 

AMSOOS 

<note  1/ 


disquette!  SAVE  "FICHIER", A 


A1SDCS 
Bin  aire  t 


Autres  su» 
di squette 


inssff;  disquette  CP'N  PLUS 

:  cppi 

PIP   Bi'FlCHlER 

ftMSDOS  , 


mssrs:   disq.  CP/N  PLUS 

:CPn 

PIP    B:=FICHIER 

AflSDOS 


ins.    disq.    CP/fl   PLUS 

CPU 
PIP  Bi=-FICHIER 
ANSOOS 


*  Fichier  avec  en-tete 

<note  1  >  :  requiert  de  I'espace  disque  libre  pour  y  loger  1c  programme  de  temporisation 
«TEMP». 

<note2>  :  <d>  est  I'adresse  de  depart  du  dossier,  <]>  sa  longueur  et  <r>  I'adressede 
lancement  facultative. 

<note  3>  :  la  copie  est  inutilisable  directement  par  le  BASIC.  Cependant  cette  option  est 
un  moycn  ires  rentable  dc  transfcrl  ct  de  sauvegarde  de  fichiers.  Le  fichier  peut  etre 
ensuite  recupere  par  la  disquette  au  moyen  de  CLOAD«  FICHIER  »  (sous  CP/M  2.2). 
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Guide  des  messages  d'erreur  d'AMSDOS 

Lorsque  pour  une  raison  quclconquc,  AMSDOS  ne  peut  executer  une  commande  il 
aS  un  message  d'erreur  a  Tec-ran.  En  cas  de  probleme  materiel,  le  message  est  suivi  de 
la  question  : 

Retry,  Ignore  or  Cancel  ? 

R  :  la  commande  est  reexecutee  apres  que  l'utilisateur  ait  pallie  au  probleme. 

1 : 1'ordinateur  continue  son  travail  comme  si  de  rien  n'etait.  amenant  souvent  des  resul- 
tats  inattendus  et  probablement  errones. 

C  :  1'operalion  est  annulec,  ce  qui  enlraine  souvent  un  autre  message  d'erreur. 

Signification  des  messages 

Unknown  command 
La  commande  n'a  pas  ete  ecrite  correctement. 

Bad  command 
La  commande  ne  peut  etre  executee.  Erreur  de  syntaxe  ou  mauvaise  configuration  mate- 
rielte. 

<nomfich>  already  exists 
L'utilisateur  essaye  de  renommer  un  fichicr  avec  un  nom  deja  utilise  sur  la  disquette. 

<nomfich>  not  found 
Le  fichier  n'existe  pas. 

Drive  < unite >  :  directory  full 
Plus  de  position  dans  le  catalogue. 

Drive  <unite>  :  disc  full 
Plus  de  place  sur  la  disquette. 
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Drive  <unite>  :  disc  changed,  closing  <nomfich> 

La  disquette  a  ete  enlevee  avec  des  fichiers  laisses  ouverts. 

<nomfich>  is  ready  only 

Le  fichier  est  limite  en  lecture  et  ne  peut  etre  traite.  Cet  attribut  est  accorde  ou  supprime 
sous  CP/M  uniquement. 

Drive  <unite>  :  disc  missing 

Disquette  absente  du  lecteur,  ou  mal  mise  en  place  (ne  tournant  done  pas).  II  est  alors 
recommande  de  rejecter  et  de  la  remettre  a  nouveau,  puis  de  taper  R. 

Drive  <unite>  :  disc  is  write  protected 

On  a  essaye  d'ecrire  sur  une  disquette  dont  le  trou  de  protection  en  ecriture  est  ouvert. 
La  sortir,  obturer  le  trou  de  protection,  la  reinsurer  et  taper  R. 

Drive  <unite>  :  read  fail 

Probleme  materiel.  II  est  recommande  d'ejecter  ia  disquette  puis  de  la  remettre  en  place. 
Taper  R. 

Drive  < unite >  :  write  fail 

Comme  precedemment. 

Failed  to  load  CP/M 

Erreur  de  lecture  au  chargement  du  CP/M  (I  CPM)  ou  disquette  systeme  invalide.  Ou 
bien  votre  disquette  ne  contient  pas  de  CP/M.  Si  vous  tenter,  de  charger  le  CP/M  a  partir 
d'une  disquette  de  donnees,  vous  obtenez  le  message  «  read  fail  ». 
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Partie  2 :  CP/M 

CP/M  Plus 

Sujets  abordes : 

*  Introduction  au  CP/M  Plus 

*  Chargement  du  CP/M  Plus 

*  Le  Mode  Direct 

*  Les  programmes  transitoires 

*  Gcstion  des  peripheriques 

Le  CP/M  Plus  est  fourni  avec  le  6128.  C'est  un  systeme  Sexploitation  de  disquettes  qui 
vous  permettra  d'utiliser  toute  la  puissance  de  votre  ordinateur.  Ses  128Ko  de  memoire 
RAM  sont  pleinement  exploites.  laissant  plus  de  61  Ko  a  Tutilisateur  pour  ses  program- 
mes. CP/M  integre  un  acces  selcctif  aux  fichiers  de  donnees  et  le  CP/M  6128  apporte  les 
avantages  d'un  emulateur  de  terminaux  (posies  VDU)  perfection™*.  Implante  sur  de 
nombreux  ordinateurs.  CP/M  a  suscite  le developpement  de  milliers de logicicls  d  applica- 
tion et  accumule  une  experience  et  des  connaissanccs  enormes,  sur  lesquelles  vous  pourrez 
vous  appuycr. 

Vous  trouvere?  une  documentation  complete  sur  1c  CP/M  Plus,  des  indications  pour 
l'ecriturc  de  vos  proprcs  programmes  et  des  informations  concernant  rimplantation 
CP/M  Plus  d'AMSTRAD,  dans  le  guide  dc  CPM  Plus  (SOFT  971). 


Introduction 

Le  systeme  d'exploitation  CP/M  sert  d'interface  avec  le  mecanisme  de  ('unite,  vous  per- 

mettant  de  communiquer  avec  t'ordinateur  et  de  manipuler  ses  fichiers  et  peripheriques 

Des  commandes  spcciales  (et  des  programmes  sur  disquettc  appelcs  utilitaires)  vous 
aident  a  realiser  votre  principale  tache  :  l'exploitation  de  vos  programmes  duplications 
avec  vos  propres  donnees. 
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II  va  sans  dire  que  vous  pouvez  devenir  expert  en  matierc  d'utilisation  du  CP/M  et  de 
fonctionnement  des  differcnts  utilitaires :  cela  vous  sortira  d'affaire  pius  d'une  fois. 
Cependant.  la  plupart  des  utilisatcurs  peuvent  se  contentcr  des  connaissances  de  base  per- 
mettant  de  demarrer.  La  suite  de  ce  chapitre  va  leur  permettre  de  decouvrir  les  fonctions 
du  systeme  et  tous  scs  avantages,  sans  que  1'essentiel  soit  cnscveii  sous  un  exces  de  details. 

Le  mode  direct  est  Pintermediaire  principal  a  votre  disposition.  On  l'identifie  par  la  pre- 
sence des  indicateurs  d'attente  A  >  ou  B  >  a  1'ecran.  Certaines  commandes,  dites  residen- 
tes,  sont  accessibles  directement,  a  I'inverse  de  la  plupart  des  fonctions,  obtenues  en  char- 
geant  en  memoire  des  programmes,  dits  transitotres,  pour  le  temps  de  leur  utilisation 

uniquement. 

A  cote  des  messages  d'erreur  standard  du  CP/M,  le  systeme  genere  ses  proprcs  messages, 
lis  se  distinguent  des  autres  car  ils  apparaissent  dans  la  banniere  de  1'ecran. 


CP/M  Plus  sur  la  disquette 

La  plus  grande  partie  du  CP/M  Plus  reside  dans  un  fichier  special  de  type  «  .EMS*51  » 
qui  se  trouve  sur  la  face  1  d'une  des  disquettes  systeme.  Le  chargemeni  en  memoire  du 
CP/M  a  partir  de  ce  fichier  s'effectue  en  deux  temps. 

La  commande  AMSDOS  CPM  charge  d'abord  le  premier  secteur  de  la  piste  0.  Ce  sec- 
teur  de  la  disquette  systeme  contient  un  programme  qui  charge  'le  fichier  .EMS  en 
memoire.  Le  reste  des  pistes  systeme  demeure  inutiltse. 


Creation  de  fichiers  PROFILE 

Lors  du  chargement  du  CP/M  Plus,  les  commandes  du  fichier  PROFILE. SUB  (s'il  se 
trouve  sur  la  disquette)  sont  executees.  Cette  particularity  permet  de  redefinir  le  clavier, 
personnaliser  le  mode  d'affichage  de  t'ecran,  initialiser  1'imprimante  et  meme  effectuer 
le  lancement  automatique  d'un  programme  d'application.  Nous  avons  vu  au  chapitre  4 
comment  renommer  le  fichier  PROFILE  residant  sur  la  face  1  de  la  disquette  systeme 
afin  qu'il  soit  execute  lors  du  chargemeni. 

Pendant  I'execution  du  fichier  PROFILE,  un  petit  fichier  provisoire  est  ouvert  sur  la  dis- 
quette qui  ne  doit  done  pas  avoir  ete  protege  en  ecriture.  C'est  pourquoi  la  disquette  sys- 
teme ne  peut  pas  contenir  de  fichier  PROFILE  executable. 
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Les  fichiers  PROFILE  peuvent  s'obtenir  a  l'aide  d'un  traitement  de  texte,  d'un  editeur  de 
texte  (ED.COM.  par  exeraple)  ou  meme  a  partir  du  BASIC.  Ainsi,  le  petit  programme 
en  BASIC  ci-dessous  pourrait  generer  le  fichier  PROFILE.SUB. 

10  QPENOUT  "PROFILE.SUB" 

20  PRINT  #9,"5ETKEYS  KEYS.CCP" 

30  PRINT  #9, "LANGUAGE  3" 

40  CLOSEOUT 

Codes  de  controle  de  la  console 

L'univcrs  CP/M,  c'est  aussi  un  ensemble  de  codes  clavier  speciaux  pour  controler  le 
deroulemcnt  des  programmes.  Ces  codes  remplacent  le  [ESC]  du  BASIC  et  les  touches  de 
deplacement  du  curscur  du  BASIC  AMSTRAD.  Les  codes  de  controle  ci-dessous  sont 

affectes  apres  lancement  de  la  eommande  : 

Les  codes  de  controle  ci-dessous  sont  affectes  apres  lancement  de  la  eommande  : 

SETKEYS  KEYS.CCP 

Le  programme  transitoire  SETKEYS.COM  et  le  fichier  de  eommande  KEYS.CCP  se 
trouvent  sur  la  face  I  d'une  des  disquettes  systeme. 


Code  de  controle 
[C0NTR0L1A    <3 


Touche 


[CONTROL]B    [CONTROL]^ 

ou 
[CONTROL]^ 

[CONTROL]C     [CONTROL]  [ESC] 

[CONTROL]E     [CONTROL][RETURN] 

[CONTROL]  F     O 

[CONTROL]G    [CLR] 
[CONTROL]  H    [DEL] 

[CONTROL]!      [TAB] 

„-.  V.i,-:  ■  ■   ■     ■;■-■■ 
[CONTROL^ 


Action 

Deplace  le  curseur  d'un  caractere  vers  la 

gauche 

Deplace  le  curseur  jusqu'au  debut  de  la 
ligne  ou.  s'il  s'y  trouve  deja,  en  fin  de 

ligne. 

Abandon 

Retour  chariot  physique 

Deplace  le  curseur  d'un  caractere  vers  la 
droite 

Efface  le  caractere  situe  sous  le  curseur 

Effacement  du  caractere  precedant  le 
curseur 

Deplace  le  curseur  jusqu'a  la  tabulation 

suivante 

Validation  de  la  ligne  de  eommande 
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[CONTROL]K    [CONTROIHCLR] 

[CONTROL]*/!   [RETURN] 
ou 
[ENTER] 

[CONTROL]P 


[CONTROL]Q 

[CONTROL]R     [CONTROL]  [ENTER] 
[CONTROLS     [ESC] 


[CONTROL]U 
[CONTROL]W  [COPY] 

[CONTROL]X     [CONTROL][DEL] 
[CONTROL]Z 


Efface  !es  caracteres  jusqu'a  la  fin  de  la 
ligne 

Validation  de  la  ligne  de  commande 


Basculement  en  mode  copie  d'ecran  : 
toute  sortie  vers  I'ecran  sera  automati- 
quement  imprimee  ;  unc  deuxieme  com- 
mande identique  permet  de  revenir  au 
mode  normal 

Revalide  la  sortie  des  donnees  vers 
I'ecran 

Retape  une  ligne  de  commande 

Suspend  momentanement  la  sortie  des 
donnes  vers  I'ecran  en  provenance  du 
CP/M.  Voir  [CONTROL]  Q  pour 
reprendre 

Supprime  une  ligne 

Rappelk  la  ligne  de  commande  la  plus 
recemment  tapee 

Efface  le  debut  de  la  ligne  jusqu'au  cur- 
seur 

Fin  de  texte 


Les  noms  de  fichiers 

Beaucoup  de  commandes  ont  pour  parametres  des  noms  de  fichiers  contenant,  le  cas 
echeant,  desjockers  (voir  le  paragraphe  «  jockers  »  dans  la  partie  1  du  chapitre).  Tous  les 
noms  de  fichiers  sont  automatiquement  mis  en  majuscules, 

Les  commandes  du  mode  direct  ne  requiercnt  pas  le  placement  de  guillemets  de  part  et 
d'autre  du  nom  de  fichier. 

Rappelcz-vous  que  les  noms  de  fichiers  peuvent  etre  precedes  de  A:  ou  B:  pour  demander 
a  CP/M  d'utiliser  une  unite  particuliere. 

Voici  la  syntaxe  d'une  commande  CP/M  type  : 
TYPE  KEYS.CCP 

TYPE  est  la  fonction  requise  : «  affichage  a  I'ecran  »,  et  KEYS.CCP  est  le  nomdu  fichier 

que  Ton  desire  voir  apparattre. 
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L'aiguillage  des  unites 

II  est  possible  d'aiguiller  le  systeme  de  selection  des  unites  vers  A  ou  B  en  tapant  A:  ou 
B:  apres  lc  symbole  B  >  ou  A>  (qui  indique  l'unite  en  cours).  L'ajout  du  prefixe  A:  ou 
B:  au  nom  de  fichier  ecrasc  la  valeur  de  l'unite  par  defaut  mais  ne  la  redefinit  pas. 

Les  commandes  du  mode  direct 

Ces  commandes  peuvent  etrc  tapees  a  l'apparition  des  symboles  A  >  ou  B  > .Elles  peu- 
vent  etre  abregees.  Les  fonctions  ci-dessous  sont  integrees,  mais  il  existe  plusteurs  com- 
mandes transitoires,  plus  complexes,  portant  le  meme  nom. 


La  commande  D1R 

DIR  affiche  le  catalogue  de  la  disquette.  Les  fichiers  apparaissent  selon  leur  ordre  d'entree 
sur  le  repertoire  de  la  disquette.  Les  jockers  sont  permis.  Les  fichiers  a  attribut  «  SYS  » 

ne  sont  pas  permis. 

DIR  donne  la  liste  de  tous  les  fichiers  de  l'unite  par  defaut 

DIR  B:  donne  la  liste  de  tous  les  fichiers  de  l'unite  B 

DIR  *.BAS  donne  la  liste  des  fichiers  de  type  .BAS 

DIR  B:*.BAS  donne  la  liste  des  fichiers  de  type  .BAS  de  l'unite  B 

DIR  PIP.COM  seul  PIP. COM  apparait  sur  la  liste  (s'il  existe) 


La  commande  DIRS  ou  DIRSYS 

DIRSYS,  ou  DIRS,  ne  liste  que  les  fichiers  du  catalogue  possedanl  «  SYS  »  comme 
attribut.  A  cette  particularity  pres,  cette  commande  fonctionne  comme  la  commande 

DIR.  L'attribut  SYS  est  decrit  plus  loin. 


La  commande  ERA  ou  ERASE 

ERA  vient  de  1'anglais  ERAse  qui  veut  dire  effacer.  Elle  sert  done  a  effacer  un  ou  plu- 
sieurs  fichiers  du  catalogue.  En  fait,  la  position  sur  le  repertoire  est  effacee,  les  donnees 
restant  en  place  jusqu'a  ce  qu'un  autre  fichier  ne  les  recouvre.  Elles  ne  peuvent  toutefois 
jamais  ctrc  recuperees.  Bien  que  les  jockers  soicnt  permis,  la  specification  de  *.*  provoque 
l'affichage  d'une  demande  de  confirmation  avant  que  ERA  n'efface  effectivement  1'ensem- 
ble  des  fichiers.  ERA  ne  mention  ne  pas  le  nom  des  fichiers  qu'elle  efface.  Si  Tun  des 
fichiers  a  effacer  est  de  type  'lecture/seulement',  (voir  STAT  plus  loin),  la  commande 
n*aboutit  pas. 
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ERAPIP.COM  effaceraIefichierPIP.COM 

ERA  BiPIP.COM  effacera  le  fichier  PIP.COM  de  I'unite  B 

ERA  *.BAS  effacera  tous  les  fichiers  de  type  BAS 

La  commande  REN  ou  RENAME 

La  commande  REN  vous  permet  de  changer  le  nom  (RENommer)  d'un  fichier  existant. 
Le  nouveau  nom  est  specific  en  premier  suivi  du  signe  egal  (  =  ),  puis  du  nom  du  fichier  a 
renommer.  Si  le  nouveau  nom  existe  deja  sur  la  disquette,  un  message  d'erreur  s'aflkhe. 

Les  noms  de  fichiers  comportant  des  jokers  ne  rentrent  pas  dans  le  cadre  de  cette  com- 
mande integree ;  il  faut  done  faire  appel  au  programme  transitoire  RENAME.COM. 

REN   N0UVN0M.BAS  =  ANCNOM.BAS  donnc  au  fichier  ANCNOM.BAS  le 

nouveau  nom  NOUVNOM.BAS 

REN  B:NOUVNOM,BAS  =  ANCNOM.BAS  donne  au  fichier  ANCNOM.BAS  le 

nouveau    nom    NOUVNOM.BAS, 
sur  B. 

La  commande  TYPE  ou  TYP 

La  commande  TYPE  (imprimer)  demande  que  le  fichier  specifie  defile  a  Pecran.  Si  ce 
fichier  n'est  pas  de  type  ASCII,  des  choses  imprevisibles  risquent  d'apparaitre  a  Pecran. 

TYPE    KEYS.CCP 
...affiche  le  fichier  KEYS.CCP. 


La  commande  USER,  ou  USE 

USER  change  le  numero  d'utilisateur  courant.  CP/M  Plus  s'initialise  avec  le  numero 
d'utilisateur  courant  0.  Vous  ne  pouvez  acceder  qu'aux  fichiers  identifies  par  le  numero 

d'utilisateur  courant,  ce  qui  permet  de  partager  le  catalogue. 

II  est  possible  d'acceder  a  un  fichier  dc  Putilisateur  0  ayant  «  SYS  »  comme  attribut  a 
partir  dc  tous  les  autres  numeros  d'utilisateur.  Cette  puissante  fonction  permet  de  rendre 
les  utilitaires  et  les  programmes  d'applications  accessibles  a  tous  les  utilisatcurs  sans  avoir 
a  les  copier  dans  chaque  zone  utilisateur. 

USER    3 

definit  Putilisateur  courant  numero  3. 
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Les  commandes  transitoires 

Pour  realiser  sur  vos  fichiers  des  operations  un  peu  plus  sophistiquees  qu'avec  le  mode 
direct,  vous  pouvcz  faire  appel  a  Tun  des  nombreux  programmes  utilitaires  fournis  avec 
le  CP  M.  Vous  les  appelez  simplemcnt  en  tapant  leur  nom,  suivi  parfois  d'un  nom  de 
fichier  et/ou  d'un  ou  plusieurs  parametres.  Vous  avez  deja  probablement  utilise 
DISCKIT3. 

Nous  avons  rcgroupe  ccs  commandes  par  categories.  Vous  en  trouverez  une  documenta- 
tion complete  dans  le  Guide  du  CP/M  Plus. 

Les  commandes  DISCKIT3,  SETKEYS,  SETLST.  SETSIO.  PALETTE, 
LANGUAG  E  et  AM S DOS.  ainsi  que  les  programmes  de  gestion  d'ecran  GSX  et  ins- 
tallation de  LOG03.  propres  a  AMSTRAD.  ne  fonctionnent  que  sur  son  systeme  et  ne 
peuvent  etre  employees  sur  les  autres  systemes  CP/M. 

Vous  pouvez  entrer  plusieurs  commandes  sur  une  meme  ligne  en  separant  les  commandes 

par  un  point  d'exclamation.  Exemple  : 

LANBUAGE  3! SETKEYS  KEYS.WP 

La  gestion  des  peripheriques 

DISCKIT3  formate,  copie  et  verifie  les  disquettes.  II  est  plus  rapide  de  formater  pendant 
la  copie  que  d'effectuer  les  deux  operations  en  deux  temps.  Des  menus  vous  indiquent  Ses 
touches  a  activer  (cssentiel lenient  des  touches  de  fonction).  Les  disquettes  commerciali- 
sees  sont  similaires  aux  disquettes  systeme  sinon  qu'elles  sont  adaptees  a  la  distribution 
de  logiciels  ;  toutefois,  les  disquettes  formatees  pour  le  stockage  des  donnees  sont  peut- 
etre  plus  adequatcs  pour  travaillcr  sous  CP/M  Plus. 

AVERTISSEMENT 

Le  brevet  de  votre  disquette  CP/M  (qui  possede  un  numero  de  scrie  code  electroni- 
quement)  vous  permet  de  1'utiliser  sur  un  seul  micro-ordinateur.  Ceci  signifie  en  particu- 
lier  qu'ii  vous  est  interdit  de  faire  don  d'une  copie  de  votre  CP/M  (copie  qui  possederait 
alors  votre  numero  de  serie).  Etant  donne  que  chacunc  des  copies  dc  la  face  I  des  disquet- 
tes systeme  conticnt  votre  CP/M  (dans  le  fichier  .EMS),  il  vous  est  interdit  de  vend  re  ou 
echanger  toutc  disquette  contenant  ce  fichier  ou  de  vous  en  separer  de  quelque  facon  que 
ce  soit. 
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Jeux  da  caracteres 

Le  CPC6128  possede  un  jeli  compiet  de  caracteres  internationaux.  La  commande  LAN- 
GUAGE modifie  certains  caracteres  pour  permettre  a  des  Iogiciels  peu  perfectionnes 
d'afficher  a  I'ecran  d'autres  caracteres  et  des  lettres  accentuees.  Pour  plus  de  details. 

consultez  la  partie  16  du  chapitre  «  Pour  information  ». 


La  commande : 

LANGUAGE    3 

permet  d'installer  le  jeu  de  caracteres  britannique,  rempla«;ant  le  signe  jf  par  £  (le  jeu  ame- 
ricain  est  le  jeu  par  defaut). 


Les  couleurs 

Sous  CP/M  Plus,  les  couleurs  par  defaut  du  6128  (avec  moniteur  couleur)  affichent  des 
caracteres  en  blanc  brillant  sur  fond  bleu.  Vous  pouvez  les  modifier  par  la  commande 
PALETTE,  qui  possede  plusieurs  parametres,  un  pour  chaque  encre  :  I'encre  0  inclut  le 

fond  et  la  bordure  de  I'ecran  et  I'encre  1  definit  la  couleur  du  texte.  Chaque  couleur  est 
codee  par  un  nombre  compris  entre  0  et  63.  Sur  un  moniteur  monochrome,  ce  numero 
definit  1'intensite  d'affichage. 


Vous  pouvez  specifier  n'importe  quel  numero  d'encre  compris  entre  1  et  16,  mais  seules 
les  deux  premieres  encres  sont  visibles  en  mode  80  colonnes. 


La  commande : 

PALETTE  63,1 

inverse  les  specifications  normales  des  encres  0  et  1 ,  chahgeant  le  fond  en  blanc  brillant 

(63)  et  le  texte  en  bleu  (I). 


Pour  selectionner  les  couleurs  (ou  leurs  intensites),  aidez-vous  du  tableau  de  la  page  sui- 
vante.  Vous  pouvez  au  choix  utiliser  la  representation  decimate  ou  hexadecimale. 
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Couleur 

Code 

Code 

Couleur 

Code 

Code 

hexadecimal 

decimal 

hexadecimal 

decimal 

Noir 

&00 

0 

Bleu  pastel 

&2B 

43 

Bleu 

&02 

2 

Orange 

&2C 

44 

Bleu  vif 

&03 

3 

Rose 

&2E 

46 

Rouge 

&08 

8 

Magenta  pastel 

&2F 

47 

Magenta 

&0A 

10 

Vert  vif 

&30 

48 

Mauve 

&0B 

11 

Vert  marin 

&32 

50 

Rouge  vif 

&0C 

12 

Turquoise  vif 

&33 

51 

Violet 

&0E 

14 

Vert  citron 

&38 

56 

Magenta  vif 

&0F 

15 

Vert  pastel 

&3A 

58 

Vert 

&20 

32 

Turquoise  pastel 

&3B 

59 

Turquoise 

&22 

34 

Jaune  vif 

&3C 

60 

Bleu  ciel 

&23 

35 

Jaune  pastel 

&3E 

62 

Jaune 

&28 

40 

Blanc  brillant 

&3F 

63 

Blanc 

&2A 

42 

Le  clavier 

Vous  pouve?  modifier  les  codes  generes  par  le  clavier  a  1'aide  de  la  commande 
SETKEYS.  Ccci  permet  d'affecter  les  codes  adcquats  aux  touches  physiques  ou  logiques. 
Les  codes  doivcnt  ctre  inscrits  dans  un  fichier  dont  le  nom  est  ensuilc  passe  en  parametre 
dans  la  commande  SETKEYS.  Ce  fichier  de  commande  peut  etre  cree  par  un  editeur  de 
texte,  PIP.  ou  meme  a  parti r  du  BASIC.  Par  exemple : 

SETKEYS  KEYS.TST 

ou  le  fichier  KEYS.TST  contient : 

E  &8C  «  DIR  'M  »  touche  logique  12 

8  N  S  C  «  |H  »  espace  arriere =  [CONTROL]H,  08  ASCII 

Ceci  modifie  la  touche  logique  [CONTROL]  [ENTER]  (code  &8C),  qui  devient  DIR 
[RETURN],  el  transforme  la  touche  de  retour  arriere  du  curseur  <3  (touche  numerique 
8)  en  espace  arriere. 

Les  fichiers  standard  du  6128  sont  KEYS.CCP  pour  lescommandes  CP/M,  KEYS.DRL 
pour  le  Dr.  LOGO  (face  3  de  la  disquette  systeme)  et  KEYS,  WP  qui  convient  a  de  nom- 
breux  traitements  de  texte. 
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Les  imprimantes 

Les  imprimantes  peuvent  etre  initialisees  par  la  commande  : 

SETLST  <nomfich> 

le  «  nomfich  »  contient  la  ou  les  chaines  a  envoyer  a  l'imprimanle.  Comme  avec  le  fichier 
de  commande  pour  SETKEYS,  les  codes  de  controle  peuvent  etre  represents  par  : 

|  <caractere> 
ou 

]"  <  valeur  du  caractere  >  ' 
ou  bien 

I'  <  nom  du  code  de  controle  > ' 

Les  noms  des  codes  de  controle  sont  ESC,  FF,  etc.,  comme  Pindique  le  tableau  des  carac- 

teres  ASCII  du  chapitre  «  Pour  information  ». 

Pour  de  nombreuses  imprimantes.  la  valeur  15  represente  un  code  d'initiatisation  utile, 
definissant  une  impression  condensee. 

La  commande : 

PRINT  *8,CHR*(iS) 

serait  la  syntaxe  en  BASIC.  Sous  CP/M,  elle  devient : 
SETLST    CONDENSE 

Le  fichier  CONDENSE  contient  Tune  des  lignes  ci-dessous : 
t'SP 

to 

t'JsF' 
T'15» 

qui  representent  toutes  la  valeur  decimate  1 5. 

Pour  certains  programmes  d'application,  l'ecran  doit  etre  de  24  lignes  x  80  colonnes.  La 
commande  SET24X80  permet  d'obtenir  ce  format  d'ecran. 
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Pour  activer  le  mode  24x80,  utilisez  les  commandes : 
SET24XS0 

ou 

SET24X8B   ON 

Pour  le  desactiver,  utilisez  la  commande :  ■ 

5ET24X80   OFF 

La  taille  d'ecran  normale  du  CPC6128  est  24  x  80,  la  derniere  ligne  etant  reservee  aux 
messages  d'etat.  La  deactivation  du  mode  24  x  80  n'est  visible  que  si  la  ligne  d'etat  est 
egaiement  invalidcc.  Pour  la  validation  et  revalidation  de  la  ligne  d'etat,  reportez-vous 
a  la  partie  1 5  du  chapitre  7. 

Interface  serie 

CP/M  Plus  permet  de  gerer  une  interface  RS232  ne  possedant  qu'un  seul  canal.  Pour 
visualiser  ses  principals  caracteristiques,  tapez  la  commande  SETS  10  (sans  parametre) : 

SETSIO 

ou  une  commande  comprenant  l'une  (voire  la  totalite)  de  ces  selections : 

SETSIO,  RX  1280,  TX  75,  PARITY  NONE,   STOP   1,   BITS   8, 
HANDSHAKE  ON,  XOFF  OFF 

pour  une  nouvelle  configuration. 

Le  debit  de  I'interface  et  l'etat  XON/XOFF  peuvent  egaiement  ctre  fixes  par  la  com- 
mande DEVICE  qui  gere  les  peripheriques  logiques  et  physiques.  Les  peripheriques  logi- 
ques  sont  indiques  par  un  deux  points  (:).  Pour  visualiser  tous  les  attributs  des  peripheri- 
ques installes,  tapez : 

DEVICE 
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Pour  les  modifier  :  un  peripherique. 

DEVICE  SIOU200]        fixe  le  debit  a  1200  bauds. 
DEVICE   SIOCXON]  active  leprotocoleXON/XOFF. 

DEVICE   SI0CN0X0N3      desactive  le  protocole  XON/XOFF.] 

Vous  pouvez  egalement  modifier  les  affectations  cntre  peripheriques  logiques  et  physi- 
ques. Habituellement,  CON:  correspond  a  CRT  (clavier/'ecran),  AUX:  a  SIO  (interface 

serie  en  option)  et  LST:  a  LPT  (interface  Centronics  pour  imprimante).  La  commande  ; 

DEVICE  LST:=SI0 

envoie  les  donnees  destinees  a  I'imprimante  vers  ['interface  serie  (si  celle-ci  est  installee). 

II  s'agtt  d'un  reacheminement  de  canal,  a  ne  pas  confondre  avec  la  certaines  commandes 
PIP.  Les  deux  commandes  GET  <  nom  de  fichier>  et  PUT  <  nom  de  fichier >  reache- 
minent  les  donnees  a  destination  et  en  provenance  dc  ia  console  et  les  sorties  vers  l'impri- 
mante  en  les  dirigeant  vers  un  fichier  particulier  et  non  pas  vers  un  peripherique. 

PIP 

L'utilitaire  PIP  (Programme  d'Interconnexion  aux  Peripheriques)  vous  permet  d'echan- 
ger  des  informations  entre  l'ordinateur  et  ses  peripheriques.  La  forme  de  ces  commandes 
est  generalement : 

P I P  <  destination  >  =  <  source  > 

La  <  source  >  et  la  <  destination  >  peuvent  etre  soit  un  nom  de  fichier  (jokers  acceptes) 
pour  la  source,  soit  le  code  du  peripherique.  On  peut  utiliser  les  codes  suivants  : 

En  tant  que  source  En  tant  que  destination 

CON  :  entree  console  CON  :  sortie  console 

AUX  ;  entree  auxiliaire  AUX  :  sortie  auxiliaire 

EOF :  manque  de  fin  de  fichier       LST :  imprimante 

PRN  :  imprimante  avec  tabulations  supplementaires, 
Exemoles  -  numerotation  de  lignes  et  sauts  de  page. 

PIP   B:=A:t,C0M 

...copie  tous  les  fichiers  avec  extension  .COM  de  I'unite  A  sur  t'unite  B, 
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PIP   KEYBOARD. CPM'KEYS.CCP 
...realise  unecopie  de  KHYS.CCP  et  I'appelle  KEYBOARDCPM. 

PIP  CQN:*KEYS.CCP 
...envoie  le  fichier  KEYS.CCP  a  l'ecran  (meme  effet  que  TYPE  KEYS.CCP). 

PIP  LST:=KEYS.CCP 

...envoie  le  fichier  KEYS.CCP  sur  Pimprimante. 

PIP  TYPEIN.TXT=COMs 

...place  des  donnees  venant  du  clavier  dans  le  fichier  TYPEIN.TXT. 

L'operation  s'acheve  par  un  [CONTROLJZ,  Pour  acceder  a  une  nouvelte  ligne,  vous  devez 
envoyer  a  chaque  fois  un  [CONTROL]J  (code  ASCII  du  retour  a  la  ligne)  apres  [RETURN]. 

Si  vous  tape?  PIP  sans  parametre,  vous  recevez  le  message  *  :  vous  pouvez  alors  entrer 
les  commandes  qui  vous  interesscnt.  Ce  procede  csi  particulierement  utile  pour  la  copie 
de  fichiers  lorsque  le  fichier  PIP.COM  ne  sc  Irouve  ni  sur  la  disquette  source,  ni  sur  la 
disquette  cible.  Vous  pouvez  charger  PIP  a  partir  de  la  face  I  d'une  des  disquettes  sys- 
teme, retirer  cette  disquette  cl  inserer  les  disquettes  requises  pour  la  copie. 

Pour  sortir  de  PIP.  appuyez  sur  [RETURN]  a  I'apparition  du  message  *. 

Notez  que  PIP  ne  peut  effectuer  de  copies  de  fichiers  sur  un  systeme  a  une  seuie  unite. 
Utilise/  alors  FILECOPY. 


Gestion  du  systeme 

Les  programmes  transitoires  DIR,  ERASE,  REN  AM  E  et  TYPE  offrent  plus  de  possibi- 
lites  que  leurs  homologues  integres.  Comme  de  nombreux  programmes  transitoires  de 
Digital  Research,  ieurs  parametres  secondaires  sont  indiques  entre  crochets.  Tous  les 
details  les  concernant  llgurent  dans  les  fichiers  HELP  (face  3  d'une  des  disquettes  sys- 
teme). En  void  quelques  exemples : 

DIR    [FULL ]  affiche  la  taille et  les  attributs  des  fichiers 

ERASE   f.COM  (.CONFIRM  vous  demande  confirmation  pour  chaque  fichier  ren- 
contre 
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RENAME  vous  ^eman(^e  ^e  taper  Pancien  et  Ie  nouveau  nom  de 

fichier 

RENAME    t.SAV=*.BAK  renomme  tous  les  fichiers  a  suffixe  .BAK  en  fichiers 

.SAV 

TYPE  KEYS. MP    [NOP AGE]    supprime  la  pagination  de  1'ecran 

Nous  avons  deja  evoque  les  attributs  de  fichiers  SYS  (systeme)  et  RO  (lecture  seule- 
ment).  La  commande  SET  qui  accepte  les  jokers,  permet  de  modifier  ces  attributs  et  de 
nombreux  autres. 

Les  commandes :  .  ■    ■     . 

SET  t.COM  [RO] 
SET  KEYS.CCP  [RO] 
SET  A;  [RO] 

affectent  1'attribut  RO  (lecture  seulement)  aux  fichiers  specifies  ou  au  disque  tout  entier, 
de  facon  a  empecher  un  effacement  accidentel. 

Les  commandes  : 

SET  I.COM  CRN] 

SET  KEYS.CCP  [RttJ 
SET  A:  CRW] 

affectent  1'attribut  RW  (lecturc/ecriture)  a  ces  memes  fichiers. 

Les  commandes : 

SET  I. COM  CSYS]   . 
SET  KEYS.CCP  CSYS] 

affectent  1'attribut  SYS  aux  fichiers  specifies,  Les  fichiers  affectesde  cet  attribut  ne  seront 
pas  listes  par  la  commande  DIR  (utilisez  alors  DIRS,  ou  DIRSYS),  Cependant,  ils  peu- 
vent  etre  utilises  et.  de  plus,  s'ils  se  trouvent  dans  la  zone  utilisateur  0.  ils  seront  disponi- 
bles  dans  toutes  les  autres  zones  utilisateur. 

Les  commandes : 

SET  I. COM  [DIR]  .  . 

SET  KEYS.CCP  [DIR]  "  "  *  Jr" 

retirent  1'attribut  SYS. 
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Vous  pouvez  affecter  aux  disquettes  une  etiquette,  un  nom  on  un  mot  de  passe  reservant 
faeces  dc  1'ensemble  du  catalogue  plutot  que  celui  des  fichiers  qu'il  contient.  Vous  pouvez 
cependant  attribuer  dcs  mots  de  passe  a  des  fichiers,  individuellement. 

SET    [NAME=R0LAND1 
SET    [PflSSMQRD=LUCIEN] 
SET    [PROTECTION] 

agissent  sur  la  disquette  de  1'  unite  par  defaut. 

SET   t.*tPASSWORD=LUCIEI<U 
SET    t.lCPROTECT=READ] 

agissent  sur  les  fichiers  de  la  disquette  de  l'unite  par  defaut  (les  jokers  V  indiqueat  id 
que  tous  les  fichiers  de  la  disquette  sont  concernes  par  la  commande). 

La  commande  INITDI R  (face  2  d'une  des  disquettes  systeme)  permet  de  «  marquer  »  une 
disquette,  en  vue  de  la  prise  en  compte  de  la  date  et  de  Pheure  lors  d'une  creation  ou  mise 
a  jour  de  fichier.  Les  commandes : 

BE*"  [CREATE-ON!   ■.■«....   tACCESS=QN]  ...  et.. 

SET  CUPDATE=0N1   ...avec... 
DIR  [FULL] 

permettent  de  «  marquer  »  la  disquette  (INITDI  R).  puis  de  specifier  que  la  date  et  Pheure 
seront  prises  en  compte  pour  la  creation  et  la  mise  a  jour  de  fichier.  La  commande  DIR 
[FULL]  permet  de  visualiser  le  catalogue  de  la  disquette  avec  affichage  de  la  date  et  <Je 
Pheure  de  creation  et  de  mise  a  jour.  Vous  devez  alors  taper  : 

DATE   SET 

a  chaque  lancement  de  CP/M  Plus  pour  mettre  l'horloge  du  systeme  a  rheure  Elk  sera 
ensuite  mise  a  jour  regulierment  par  votre  ordinateur  et  vous  pourrez  la  verifier  par  les 

commandes : 

DATE 
...et... 

DATE  CONTINUOUS 

AVERTISSEMENT 

Si  vous  attribuez  a  une  disquette  des  mots  de  passe,  une  etiquette  ou ^'indication i  de :  la 
date  ct  du  jour,  il  est  recommande  dc  ne  plus  y  ecrire  de  donnees  sous  AMSDOb  ou  CP/M 
2.2  car  aucun  dcs  deux  ne  possedent  ces  fonctions. 
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Sauf  specification  contraire,  vous  ne  pourrcz  acceder  qu'aux  fichiers  de  l'unite  par  defaut. 

La  commande : 

SETDEF  t,A: 

(ou  *  renvoie  a  l'unite  par  defaut)  ordonne  au  CP/M  (lors  de  la  recherche  de  fichiers)  de 
proceder  d'abord  dans  l'unite  par  defaut,  puis  dans  l'unite  A.  Autrement  dit,  si  B  est 
l'unite  par  defaut,  les  fichiers  seront  automatiquement  retrouvcs  meme  s'ils  n'existcnt  que 
dans  l'unite  A, 

Les  commandes : 

SETDEF  [PAGE] 

SETDEF  [NQPAGE]    ■.-■ ■  ■....•■■.,<, 

activent  et  desactivent  la  pagination  automatique  de  la  console. 

La  plupart  des  parametres  specifies  dans  les  commandes  DEVICES,  SET  et  SETDEF 
doivent  etre  initialises,  tout  comme  la  date,  a  chaque  lancement  de  CP/M  Plus,  surtout 
lorsqu'ils  se  rapportenl  aux  unites  de  disquettes  (plulot  qu'a  des  fichiers  ou  des  disquet- 
tes). Ceci  est  essentiel  pour  obtenir  un  fichier  PROFILE, SUB  correct. 

SUBMIT  est  necessaire  a  I'execution  automatique  de  fichiers  de  commandes.  Ces 
fichiers  de  commandes  conlicnnent  du  texte  et  il  est  possible  d'y  ajouter  des  lignes  de  don- 
nees  pour  des  programmes  si  ces  dernieres  commencent  par  Ie  caractere  < . 

Differentes  versions  de  la  commande  SHOW  permettent  d'afficher  la  taille  de  l'unite, 
1'espace  disponibie,  le  nombre  d'entrees  du  catalogue  disponibles  sur  la  disquette  avec  les 
zones  utilisateur  contenant  les  fichiers  et,  s'il  existe,  le  label  de  la  disquette  : 

SHOW  B: 

SHOW  B: CLABEL1 

SHOW  B:tUSERS]      ... 

SHOW  B: CDIR] 

SHOW  BsCDRIVE] 

toutes  ces  commandes  se  rapportent  a  l'unite  B. 


Abandon  de  CP/M  Plus 

AflSOQS 

Ce  programme  permet  I'abandon  du  controle  par  CP/M  pour  revenir  au  BASIC 
AMSTRAD,  d'ou  les  commandes  AMSDOS  de  gestion  des  disquettes  sont  disponibles. 
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Programmation  avancee 

Les  programmes  stockes  sur  la  face  2  d'une  des  diskettes  systeme  ^ront  essentielte 
men? aux  specialistes.  Nous  vous  recommandons  dc  consuttcr  le  gu.de  du  CP/M  Plus 
SOFT971  ou  d'autres  ouvrages  dc  reference. 

Exploitation  sous  CP/M  2.2 

Cette  partie  insiste  sur  les  differences  de  fonctionnement  du  systeme  exploit*  sous  CP/N 

2.2. 

CP/M  2.2  est  charge  a  partir  des  deux  premieres  pistes  d'une  des  d i^ettes  syst erne.  L 

sec  eur  d'amorcage  differe  de  celui  du  CP/M  Plus  ;  ve.Hez  a  ne  pas  les  confondre.  Theon 

quement. Tout  pouvez  utiliser,  indifTeremment  dans  Pune  ou  1'autre  des  unites  to ,  to 

qiettes  commercialisms,  IBM  ou  formatces  pour  des  donnees  ma.s.  pour  des  ra  « msd 

fonctionnement  du  systeme,  vous  devrez  generalement  limitcr  leur  emplo,  a  la  deux.em 


unite. 


En  dehors  de  1' intervention  d'un  utilitaire  CP/M  (tel  que  FILECOPY),  CP/M  2.2  ne  vo 
perme  pas  dC eCrire  sur  une  disquette  sans  qu'ellc  ait  prealablement  ete  amorcee. De     u 
i  type  de  formatage  (Systeme,  Data,  IBM)  n  est  pm  en  ^P^JT*  \ ™°™ 
Pour  l'unite  principalc  (A),  cet  amorcage  se  produtt  chaque  fo.s  que  CP,  M  2  .  repdsse  e 
mode  direct  ou  queYon  envoic  un  [CONTROL*  apres  le  message     .»   ^    ^ 
B> .  L'unite  supplementaire  (B)  est  arnorcee  la  premiere  fois  que  1  on  y  accede.  1  unite 
etant  arnorcee. 
Si  vous  essayez  d'ecrire  sur  une  disquette  qui  n'a  pas  ete  arnorcee,  le  message  d'erreui 

Bdos  Err  on  <drive>  :  R/O 

apparait.  Appuyez  sur  n'importe  quelle  louche  pour  continue.-.  Si.  de  surcroit  la  d 
queue  est  dotee  d'un  format  different  une  erreur  en  lecture  ou  ecnture  se  produ.t.  Tat 
C  pour  poursuivre. 

Si  vous  achctez  un  logiciel  sur  disquette,  vous  devez  le  copier  sur  une  disquette  syster 
CP/M  2  2l  1'aidc  de  RLECOPy'ou  PIP,  ou  convert* U .disquette  en  d.squette .yster 
en  y  ajoutant  votre  CP/M.  a  1'aide  des  commandes  BOOTGEN  et  SYSGEN.  L* 
attentivement  le  contrat  d'utilisation  des  logiciels  de  1  annexe  1. 

SYSGEN,  sans  parametre,  est  le  programme  de  copie  par  excellence  qui  vous  indiq 
par  des  messages insertion  des  disquetles  source  et  cib  e,  etcopxe  les  pistes  CP/M - 
d'une  disquette  sur  I'autre.  De  meme.  BOOTGEN  cop.e  le  secteur  1  de  la  p.ste  0  (le  ch. 
geur)  et  le  secteur  de  configuration. 

La  commande  DIR  naccepte  pas  de  parametre  hormis  un  identificatcur  de  fichier.  I 
fichiers  apparaissent  selon  leur  ordre  d'entree  sur  le  repertoire  dc  la  disquette. 
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La  commande  STAT  possede  certaines  fonctions  de  base  de  SET  et  SHOW.  Les  com- 

mandes  : 

STAT 
STAT  A: 
STAT  B: 

...affichent  I'etat  de  la  disquette  et  l'espace  disponible. 

STAT  t.CDM 
STAT  EX1.BAS 

...affichent  des  complements  d'infonnation  sur  un  fichier  particulier. 

STAT  *.C0M  *R/0         ■  ' 

STAT  EX1.BAS  t«/0 

...attribuent  a  un  fichier  le  statut  'lecture  seulement',  de  fa«;on  a  ce  qu'il  ne  puisse  pas  etrc 
detruit  accidentellement. 

STAT  t.CQM  *R/W 
STAT  EX1.8AS  *R/M 

...remplacent  un  fichier  au  statut  normal  de  lecture/ecriture. 

STAT  t.CDM  *SYS 
STAT  SECRET. BAS  *SYS 

...attribuent  a  un  fichier  un  statut  «  systcmc  »  qui  le  rend  invisible  sur  le  catalogue  de  la 
disquette  et  inaccessible  aux  programmes  de  copie  de  fichiers  tout  en  restant  disponible 
a  tout  autre  usage. 

STAT  *.CQM  IDIR 
STAT  SECRET. BAS  $D1R 

...inversent  le  statut  precedent.  Redonnentau  fichier  son  statut  visible. 


L'utilitaire  FILECOPY  vous  permet  de  copier  des  fichiers  d'une  disquette  sur  une  autre 
avec  un  systeme  a  une  seule  unite.  II  vous  donne  les  instructions  necessaires  pour  les  chan- 
gements  de  disquettes.  Si  vous  utilisez  des  noms  de  fichiers  avec  jockers,  il  vous  deman- 

dera  confirmation  entre  chaque  fichier  puis  affichera  le  nom  des  fichiers  au  fur  et  a  mesure 
de  la  copie. 
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F 1 LECQPY    * .  COM  ...copie  tous  Ies  fichiers  .COM. 

FILECOPY  PIP. COM  ...copielefichierPIP.COM. 

DISCKIT2  assure  Ies  memes  fonctions  que  DISCKIT3  mais,  disposant  de  moins  de 

memoire,  il  copie  Ies  disquettes  plus  leniemenl. 

Deux  utilitaires  sont  disponibles  pour  des  iransferts  entre  cassette  et  disquette.  Seuls  Ies 
speciatistes  trouveront  toutefois  un  interet  au  transfert  de  fichiers  autres  que  des  textes  en 

codes  ASCII. 

CLOAD  (cassette  LOAD)  accepte  deux  parametres :  le  nam  du  fichier  source  (sur  cas- 
sette) entre  guillemets,  et  le  nom  du  fichier  destination  (sur  disquette).  Si  ce  dernier  es 
omis  le  fichier  sur  disquette  porte  le  meme  nom  que  celui  sur  cassette  (obligatoirement 
compatible  avec  le  CP/M).  Si  le  nom  du  fichier  source  est  omis.  CLOAD  lit  lc  premier  nom 
qu'il rencontre  sur  la  bande.  Si  le  premier  caractere  du  nom  du  fichier  cassette  est  un!,  Ies 
messages  lies  a  l'utilisation  des  cassettes  sont  alors  suppnmes. 

Exemple : 

CLOAD  "MA  LETTRE"  MALETTRE.TXT 

CSAVE  {cassette  SAVE)  accepte  trois  parametres,  Ies  deux  premiers  etant  te  nom  du 
fichier  source  (sur  disquette)  et  le  nom  du  fichier  destination  (sur  cassette),  entre  guille- 
mets Si  le  nom  du  fichier  destination  est  omis,  ce  nom  sera  celui  de  la  source.  Si  le  premier 
caractere  du  nom  du  fichier  cassette  est  un  !,  Ies  messages  'cassette'  sont  suppnmes.  Si  Ies 
deux  noms  sont  specifies,  on  peut  alors  utiliser  un  troisieme  parametre  speciiiant  la 
vitesse  d'enregistrement :  0  pour  1000  bauds,  1  pour  2000  bauds. 

Exemples : 

CSAVE  MAIETTRE.TXT  "MA  LETTRE  TEXTE"  1 
CSAVE  FICHIER 

SETUP 

Cet  utilitaire  vous  permet  de  redefinir  Ies  caracteristiques  du  clavier  de  votre  6128,  du 
lecteur  de  disquette  et  de  I'interface  serie  ainsi  que  de  lancer  diverses  actions  au  moment 
du  chargement  du  CP/M  2.2 

Contrairement  aux  utilitaires  de  CP/M  Plus  qui  remplissent  leur  fonction  apres  Ieur  exe- 
cution, SETUP  modifie  le  secteur  de  configuration,  appele  lors  de  I'amorcage  a  froid  de 
ia  disquette.  II  rappelle  a  cet  egard  Taction  de  I'utilitaire  PROFILE.SUB. 
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Ce  programme  est  dirige  par  un  menu  :  lorsqu'urt  ecran  est  correct  ou  ne  requiert  aucune 
modification,  vous  passez  au  suivant  en  repondant  Y  a  ia  question  : 

Is  this  correct  <Y/N):_ 

II  est  possible  d'arreter  le  programme  a  tout  moment  par  la  commande  [CONTROL]:C  Une 
fois  tous  les  chargements  effectues,  il  vous  demande  : 

Do  vou  want  to  update  your  system  disc  <V/N)s 

(Confirmez-vous  cette  remise  a  jour  de  la  configuration  de  votre  systeme) 

...qui  vous  permet  de  revenir  a  1'ancienne  configuration  (en  tapant  N). 

Oa  you  want  to  restart  CP/M  (Y/N):_ 

...permettant  d'initialiser  et  done  de  tester  votre  nouvelle  configuration  en  repondant  Y. 

Pour  copier  la  zone  ou  sont  sauvegardees  les  variables  du  systeme,  d'une  disquette  sur 
une  autre,  vous  pouvez  soit  utiliscr  BOOTGEN  (voir  plus  loin),  soit  charger  SETUP  du 
disque  source,  en  repondant  Y  a  la  question  «  Do  you  want  to  update  your  system  disc 
(Y/N) :  -  » 

Les  caracteres  qui  ont  une  valeur  ASCII  inferieure  a  32  peuvent  etre  entres  a  1'interieur 
d'une  chaine  alphanumerique  en  tapant  suivi  du  caractere  |  convenable  tire  de  la  serie  @, 
A...Z,[,\,  ],>,-. 

Les  options  suivantes  reviennent  le  plus  souvent : 

**  Initial  command  buffer  (zones  de  commandes  a  1'initialisation) : 

Tous  les  caracteres  entres  ici  apparaitront  comme  s'ils  avaient  ete  tapes  en  mode  direct 
au  moment  du  chargement  du  CP/M,  permettant  ainsi  de  lancer  automatiquement  un 
programme.  Souvenez-vous  d'y  inclure  1'equivalent  de  la  touche  [RETURN],  representee 
par  les  deux  caracteres  f  M. 

Ainsi,  pour  le  lancement  automatique  de  la  commande  DIR,  vous  devez  taper  dans  cette 
zone : 

DIRTM 

Pour  le  lancement  automatique  du  programme  Dr.  LOGO,  tapez  dans  cette  zone : 
SUBHIT   L0S02tM 

Sign-on  string  (le  message  d'introduction) : 

C'est  le  message  affiche  en  haut  de  I'ecran  quand  on  charge  le  CP/M.  Notez  ^utilisation 
de  f  J  t  M  pour  1'entree  du  saut  de  ligne  et  du  retour  chariot.  La  premiere  partie  de  ce 
message  definit  la  couleur  de  I'ecran  et  celle  de  la  bordurc  pour  le  mode  80  colonnes  (elle 
doit  etre  recopiec  telle  quelle  si  les  caracteristiques  reslcnt  inchangees). 
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Keyboard  translations  (changement  des  codes  clavier) : 

Donne  de  nouvelles  valeurs  ASCII  aux  touches  du  clavier  comme  le  fail t  la ■  ™mmande 
'KEY  DEF'  du  BASIC.  Les  parametres  requis  sont  les  codes  cles  et  les  valeurs  AbCll  a 
leur  atiribuer.  Vous  trouverez  une  illustration  des  codes  cles  dans  le  diagramme  figurant 
en  haul  a  droite  de  I'ordinateur  ou  a  la  partie  4  du  chapitre  «  Pour  information  ». 

Keyboard  expansions  (extensions  du  clavier) 
Emule  la  commande  BASIC  'KEY'. 

Pour  terminer... 

Les  commandes  DISCK.T2,  SYSGEN,  BOOTGEN,  F.LECOPY,  S ETUP  C ISAVE^ et  CLOAD 
sont  concues  pour  les  systemes  AMSTRAD  et  ne  foncUonnent  que  sous  CP/M  2.2.  Elle 
?on «  fonction  sous  les  autres  systemes  CP/M  mais  certains  abneants  proposent 
3es  utiires  .dentiques  (portant  souvent  le  meme  nom)  adaptes  a  leurs  systemes. 

Les  programmes  CP/M  2.2  ci-dessous,  destines  aux  specialistes,  sont  egalement  disponi- 
bles  sur  la  face  4  d'une  des  disqueltes  systeme.  L'utilisateur  peut  a  leur  sujet  consulter  le 
guide  du  CP/M,  SOFTI59.  ainsi  que  d'autres  ouvrages  de  reference. 

ASM  Assembleur  du  8080 

DDT  Utilitaire  de  mise  au  point  des  codes  d'assemblage  du  8080 

DUMP  Utilitaire  dc  vidage  dc  fichier  sous  forme  hexadecimale 

ED  Editeur  de  texte  simple 

LOAD  Corrvertit  les  fichiers  .  HEX,  crees  avec  ASM,  en  fichiers  .  COM 

MOVCPM  Cree  le  CP/M  2.2  avec  une  taille  TPA  reduite 

SUBMIT  Utilitaire  d'execution  de  fichier  de  commandes 

XSUB  Utilitaire  de  traitement  par  lots] 

Ces  programmes  sont  reserves  au  CP/M  2.2  (face  4)  et  ne  doivent  pas  etre  confondus  avec 
d'autres  programmes  stockes  sur  les  faces  1.  2  et  3  des  disquettcs  systeme  pour  exploita- 
tion sous  CP/M  Plus. 
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Chapitre  6 
Introduction  au  LOGO 


L'objectif  de  ce  chapitre  est  de  vous  faire  prendre  contact  avec  LOGO. 

Assorti  d'exemples,  il  est  complete  d'un  guide  des  commandes  disponibles 
raais  n'est  ni  un  cours  cxhaustif,  ni  un  guide  de  reference.  II  existe  pour 
ceia  toute  une  serie  de  publications  AMSOFT  et  d'autres  ouvrages. 

Sujets  abordes : 

*  Le  concept  de  LOGO 

*  Chargcment  et  misc  en  service  de  Dr.  LOGO 

*  Le  graphisme  de  la  tortue 

*  Ecrire  vos  propres  procedures 

*  Editer  vos  propres  procedures 

Qu'est-ce  que  le  LOGO  ? 

Le  LOGO  peut  vous  aider  a  devenir  un  programmeur,  que  vous  ayez  ou  non  des  notions 
d'informatique.  C'est  un  langage  puissant  qui  devient  de  plus  en  plus  populate  en  raison 
de  sa  simplicite. 

Vous  vous  servez  de  «  procedures  »  pour  construire  les  differentes  parties  de  votre  pro- 
gramme. Le  Dr.  LOGO  a  sa  propre  collection  de  «  procedures  »  appelees  «  primitives  » 
que  vous  utiliserez  egalement  pour  programmer. 

Dans  les  annees  70,  une  equipe  de  chercheurs  en  informatique  et  d'educateurs  diriges  par 
Seymour  Papert  mil  au  point  Se  LOGO  et  sa  petite  tortue  graphique  pour  permettre  a  de 
tres  jeunes  enfanls  de  programmer  un  ordinateur.  La  tortue  est  pour  cesjeunes  apprentis, 
comme  le  dil  Papert,  un  «objet  pour  penser»,  un  outi)  pour  apprcndrc  d une  facon 
differentc.  En  forme  de  tcte  de  tleche,  elle  peut  etre  dcplacce  sur  1  ecran  a  )  aide  de  com- 
mandes simples. 
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Dr.  LOGO 

Le  Dr.  LOGO  est  une  version  tres  elaboree  du  LOGO.  Elle  a  ete  specialement  adapte  a 
Pordinateur  individuel  AMSTRAD  afin  de  le  rendre  encore  plus  simple  a  programmer. 
Des  extensions  ont  permis  d'y  inclure  la  possibility  d'utiliser  les  puissantes  facultes  sono- 

res  du  CPC61 28  tandis  que  la  correction  des  programmes  est  facilitee  par  le  pave  de  ges- 
tion  du  curseur. 

Preparons-nous 

Pour  mcttrc  en  service  1c  Dr.  LOGO,  inserez  une  copie  de  la  face  1  d'une  des  disquettes 
systeme  dans  1'unite  de  disquette  ct  tapez  : 

!cp« 

Lorsque  le  message  A  >  apparait,  rctirez  la  disquette  ct  inserez  une  copie  de  la  face  3 
(DR.  LOGO  &  HELP). 

Pour  lancer  le  Dr.  LOGO,  tapez  ; 

SUBMIT  LOGOS 

Au  bout  de  quelques  secondes,  un  message  de  bienvenue  s'affiche,  suivi  d'un  point  d'in- 

terrogation. 


Dr.  LOGO  sous  CP/M  2.2 

Remarque 

La  version  du  Dr.  LOGO  stockee  sur  la  face  4  d'une  des  disquettes  systeme  a  ete  pre- 
vue  pour  une  utilisation  du  Dr.  LOGO  sous  CP/M  2.2  (sur  AMSTRAD  CPC664  ou 
CPC464  +  DDI1).  Elle  n'est  done  pas  recommandee  sur  le  CPC6128.  La  face  3 
contient  toutes  les  specifications  du  Dr.  LOGO  de  Digital  Research. 

Si  vous  preferez  malgre  tout  utiliser  la  version  CP/M  2.2  du  Dr.  LOGO,  inserez  dans 
1'unite  une  copie  de  la  face  4  d'une  des  disquettes  systeme  et  tapez : 

ICPM 

Lorsque  A  >  apparait,  tapez  : 

SUBMIT    L0G02 

Au  bout  de  quelques  secondes  s'affiche  un  message  de  bienvenue,  suivi  d'un  point 
d'inlerrogation. 
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Les  premiers  pas 

Le  point  d'interrogation  vous  indique  que  Dr.  LOGO  est  pret  a  recevoir  vos  instructions 

au  clavier. 

Essayez  de  taper  en  minuscules  : 
<d   60    [RETURN] 

...  et  vous  verrez  apparaitre  une  tortue  (une  fleche  grand  format)  qui  avancera  de  60  uni- 
tes en  laissant  un  trait  derriere  elk.  L'ecran  va  se  restructurer  en  menageant  une  zone 
importante  pour  le  graphique  et  un  emplacement  plus  petit  pour  le  texte  (?)  en  bas  de 
l'ecran. 

Dr.  LOGO  decide  souvent  de  changer  ('organisation  de  l'ecran  avec  soit  une  grande  zone 

pour  le  texte,  soit  une  grande  zone  pour  le  graphisme,  selon  votre  besoin. 

Tapez : 

rt   98    [RETURN] 

...et  la  tortue  bougede  90  degres  vers  la  droite.. 

Maintenant  tapez : 

fd   60 

...et  une  autre  ligne  se  dessine  de  la  meme  longueur  que  la  premiere  et  a  angle  droit. 

Entrainez-vous  avec  les  instructions  fd,  bk  (back  :  arriere)  rt  et  It  (left :  gauche),  pour 
voir  ce  qui  se  passe  sur  l'ecran. 

Les  «  procedures  »  de  Dr.  LOGO 

Une  procedure  est  une  liste  destructions  accomplissant  un  certain  travail.  Vous  allez 
surement  ecrire  vos  premieres  procedures  en  utilisant  les  instructions  de  Dr.  LOGO  appe- 
lees «  primitives  ». 

fd,  bk,  rt  et  It  sont  des  primitives  de  Dr.  LOGO  utilisables  a  tout  moment  pour 
construire  vos  propres  «  procedures  ».  Une  autre  primitive  tres  utilisee  est  cs,  qui  nettoie 
l'ecran  et  renvoie  la  tortue  a  la  case  de  depart. 
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L'ela  bo  ration  d'une  procedure  simple 

Vous  pouvez  egatement  constater  que  si  la  fornrale:      '"'  '" 
H  60  rt   90 

...est  repetee  4  fois,  elie  dessine  un  carre  de  60  unites  de  cote. 
Vous  pouvez  obtenir  le  meme  resultat  en  ecrivant  tres  simplement : 
repeat    4    Cf d    60   rt    90] 

Videz  l'ecran  et  tapez  la  formule  pour  voir  ce  qui  se  passe. 

Pour  faire  de  cette  formule  unc  nouvelle  procedure,  appelee  «  carre  »,  tapez : 

ta   carre 

repeat   4   fJd   60   rt   90) 

end 

Dr.  LOGO  comprend  maintenant «  carre  »  et,  chaque  fois  qu'il  le  rencontrera,  il  tracera 
un  carre  sur  Pecran.  Nous  aurions  pu  donner  n'importe  quel  nom  a  notre  procedure,  mais 
«  carre  »  est  un  bon  moyen  pour  s'en  souvenir. 

Dr.  LOGO  nous  permet  de  taper  toutes  sortes  de  combinaisons  du  style  :  carre  rt  45 
carre,  qui  va  dessincr  2  carres,  ie  second  ayant  un  angle  de  45  degres  par  rapport  au 

premier. 


Procedures  avec  parametres 

II  est  possible  de  batir  des  procedures  auxquelles  nous  pourrons  demander  «  combien  », 
de  meme  que  pour  les  primitives.  Pour  batir  une  procedure  qui  va  construire  des  carres 
de  n'importe  quelle  taille,  nous  allons  redefinir  «  carre  »  : 

to  carrequelcanque  :cote 
repeat  4  [-fd  :cote  rt  90] 
end 

Vous  remarquerez  que  la  variable  :cote  est  precedee  de  2  points  qui  indiquent  a  Dr. 
LOGO  que  :cote  est  une  variable  et  non  pas  une  commande. 

Lorsque  nous  utiliserons  la  procedure  carrequelcortque,  :cote  doit  recevoir  une 

valeur.  Ainsi,  carrequelconque  150  donnera  un  carre  de  150  unites  de  cote. 
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Essayons  de  combiner  2  procedures  pour  voir  ce  qu'il  advient.  Par  exemple,  a  partir  d'une 
instruction  : 

cs  carrequelconque  180  rt  45  carrequelconque  150 

...la  tortue  va  dessiner  2  carres  de  cotes  differents,  Tun  faisant  un  angle  de  45  par  rapport 
a  1'autre. 

Notez  comment  Dr.  LOGO  utilise  un  point  d'exclamation  !  pour  vous  rappeler  qu'une 
iigne  de  commandes  s'est  divisee  en  plusieurs  Hgnes  sur  l'ecran. 

Utilisation  de  variables  pour  stoeker  des  valeurs 

Dr.  LOGO  vous  permet  d'utiliser  des  variables  pour  stoeker  des  valeurs  et  en  transmettre 

a  une  procedure. 

Elaborez  lout  d'abord  une  procedure  appelee  triangle  : 

to  triangle 

repeat  3  t+d  ibord  rt  120] 

end 

Vous  pouvez  tester  ceci  en  tapant : 

make  "bord  108 
triangle 

Si  nous  voulons  connaitre  la  valeur  du  bord,  nous  entrons  :bord  apres  le  ?  et  Dr.  LOGO 

nous  affiche  sa  valeur. 

Enfin  nous  pouvons  utiliser  noire  variable  :bord  dans  une  nouvelle  procedure  afin  de 
construire  un  dessin.  Remarquez  comment  la  valeur  de  :bord  est  augmentee  de  facon  a 
agrandir  notre  dessin  a  chaque  passage. 

,.  to  dessin 

triangle  It  60  triangle  rt  60 

make  "bord  :bord+4 

dessi  n 

end 

make  "bord  10 

cs  dessin 

•      Quand  vous  en  avez  assez,  appuyez  sur  [ESC]  pour  arreter  le  programme. 
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La  correction  des  programmes  et  des  procedures 

Dr.  LOGO  vous  permet  de  corriger  les  fautes  de  frappe  et  de  modifier  les  procedures  que 
vous  avez  definies.  Les  touches  utilisees  pour  la  correction  sont : 

Les  touches  curseur    <><?.  <£    pour  le  deplacement  du  curseur  d'un  caractere  ou  d'une 
ligne  a  la  fois. 

Les  touches  curseur   oolXl    combinees  a  la  louche  [CONTROL]  pour  se 
deplacer  d'une  extremiie  de  l'ecran  a  Pautre. 

[CLR]  efface  le  caractere  sous  le  curseur.  [DEL]  efface  le  caractere  a  gauche  du  curseur. 

[RETURN]  indique  au  Dr.  LOGO  que  la  correction  d'une,iigne  de  commande  est  terminee 
ou  bien  donne  la  ligne  suivante  lors  de  la  correction  d'une  procedure. 

[ESC]  signific  fin  de  correction  ct  [COPY]  signale  au  Dr.  LOGO  que  la  correction  de 

la  procedure  est  terminee. 

Quand  vous  entrez  des  commandes  ou  dc  nouvelles  procedures,  corrigez  le  tcxte  en  face 
de  vous  sur  l'ecran .  Tout  autre  caractere  que  ceux  mentionnes  plus  haut  est  insere  dans 
le  texte  a  la  position  du  curseur. 

Pour  la  correction  d'une  procedure  existante,  utilisez  la  commande  ed 

Dr.  LOGO  affiche  alors  1'ancienne  version  de  la  procedure  sur  l'ecran  et  vous  permet 
d'effectuer  ainsi  vos  modifications  a  1'aide  des  commandes  de  gestion  du  curseur. 

Essayez  la  correction  de  la  procedure  dessin  en  tapant  ed"  dessin 

Servez-vous  des  touches  de  correction.  Quand  vous  avez  termine,  appuyez  sur  la  touche 
[ESC].  Dr.LOGO  abandonne  alors  le  mode  correction  et  vous  redonne  la  version  origi- 
nate inchangee  de  votre  procedure. 

Tapez  ed  "dessin  a  nouveau  puis  changez  le  4  en  8,  appuyez  sur  la  touche  [COPY] 
pour  sortir  et  lancez  la  procedure  pour  visualiser  le  graphique  resultant.  N'oubliez  pas  de 
donner  une  valeur  a  :bord. 


Quelques  mots  sur  le  fonctionnement 

L'espace  de  travail  utilise  par  Dr.  LOGO  est  divise  en  nceuds.  Vous  pouvez  savoir  com- 
bicn  il  vous  en  rcste  en  tapant : 

nodes 
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Parfois,  lorsque  presque  tons  les  n«uds  sont  utilises,  Dr  LOGO  fera  le  menage  dc  Fes- 
pace  de  travail  et  la  tortue  fera  unc  pause.  On  peul  aussi  demander  a  Dr.  LOGO  de  iaire 

ce  nettoyage  par  la  comma  nde ; 

recycle 

Ceci  pour  vous  permettre  de  continuer  apres  que  Dr.  LOGO  se  soil  plaint  de  iTavoir  plus 

de  noeuds  disponibles. 

Si  vous  utilisez  la  version  CP/M  2.2  du  Dr.  LOGO  (face  4).  assurez-vous  f^^S 
Dr  LOGO  qu'il  y  a  suffisamment  de  place  sur  votre  disquette  pour  vous  permettre  de 
sauvegarder  vos  procedures.  Utilisez  la  commande  CAT  d'AMSDOS  (voir  la  partic  7  du 
Cours  Elementaire). 

Jetez  un  coup  d'oeil  sur  les  paragraphes  suivants  et  essayez  quelques  exemples.  Vous  tie 
comprendrez  pas  tout  la  premiere  fois.  mais  plus  vous  ayancerez  dans  votre  apprenttssage 
de  Dr.  LOGO,  plus  vous  utiliserez  de  commandes  differentes. 

Quand  vous  avez  termine  avec  Dr.  LOGO,  tapez : 

bye 

Liste  des  primitives  de  Dr.LOGO 

Ce  paragraphc  dresse  la  liste  alphabetique  des  primitives  du  Dr.LOGO  par  groupes,  en 
donnant  la  forme  syntaxique,  parfois  accompagnec  d'un  exemple. 

Les  commandes  accompagnees  d'un  asterisque  ne  sont  pas  disponibles  avec  la  version 
CP/M  2.2  du  Dr.  LOGO  (face  4  d'une  des  disquettes  systeme)  et  les  programmes 
exploitant  ces  commandes  ne  seront  done  pas  compatibles  avec  les  CPC664  et  CPC464 
+  DDI1  sous  CP/M  2.2. 


'IV.^i-. 
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TRAITEMENT  DE  MOTS  ET  DE  LISTES  : 

(Vous  remarquerez  les  symboles  ?  et  >  dans  les  exemples  suivants) 

ascii 

Donne  la  valeur  ASCII  du  premier  caraclere  de  mot  entre. 

?ascii    "8 
71 
?*icii   "g 

103 

bf 

(but  first  =  sauf  le  premier)  Donne  un  objet  sans  son  premier  element. 

?bf  "prendre 
rendre 
?bf  tl  2  3] 
C2  31 

bl 

(but  last  =  sauf  le  dernier)  Donne  un  objet  sans  son  dernier  element. 

?bl  "prendre 

prendr 

?bl  U  2  3  43 

CI  2  3] 

char 

Donne  le  caractere  qui  correspond  a  la  valeur  ASCII  entree. 

?char   83 

S 
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count 

Donne  le  nombre  d'elements  de  l'objet  entre. 

?count    "six 

3 

?count    [0    1    2   31 

4 

emptyp  ■■.■■..:;•.:;  .■  lf  i:.i-  ■ 

Repond  TRUE  (vrai)  si  l'objet  entre  et  un  mot  ou  une  Hste  vide.  Dans  le  cas  contraire 
repond  FALSE  (faux). 

?emptyp  "  ' 

TRUE  ^ 

''emptyp  [] 

TRUE  ...... 

:;'    ?emptyp  Cx] 
FALSE' 
?make  "x  [] 
?eaiptyp  :k 
TRUE 


(premier)  Donne  le  premier  element  de  l'objet  entre  et  supprime  les  crochets  de  la  lisle. 
?first    "zebre 

?*int    H    2   33 

1  ''"' 


fptrt 

(first  put  =  met  devant)  Donne  un  nouvel  objet  en  ajoutant  le  premier  element  entre  juste 

devant  le  deuxieme. 

?fput   "p   "rendre 

prendre 
■  7-fput    1    C2  31 
CI    2   31  -  -•>**'<    *  ''■'  '■  ' 
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item 

(article)  Donne  1'element  du  rang  specifie.  —.A-i:.-?i''-ti\irn-. 

?ite«i  4    "aianuel 
u 

*  ■  •  . 
last 

Donne  Ie  dernier  element  de  Pobjet  entre  (comparez  avec  MUST). 

?last    "canibal 
1 

*  ■ 
Ic 

Donne  le  mot  entre  avec  tous  les  caracteres  alpha  betiques  en  minuscules  (voir  egalement 
FIRST). 

?lc    "6RENIER 
qrenier 

list 

Donne  la  liste  des  elements  entres  en  les  encadrant  de  crochets  (a  comparer  avec  la  primi- 
tive se). 

?  (list    12  3  4) 

CI    2   3    4] 

?list    "peau   [rouge]  - 

Cpeau   [rouge]  ]  ; 

?Uist> 

13 

*  :  • 

liStP  -I  ■.-.-::     *.-„;:..-.  ■  -,.•■■.■■        :,-       .-..:  -...-.-?--.  '  ■.       ■ 

Repond  TRUE  (vrai)  si  1'objet  entre  est  une  liste.  Dans  le  cas  contraire,  repond  FALSE 
(faux). 

?listp  "mere 

FALSE 

?1  i  stp  Cpere  trere   sosurl 

TRUE 
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« lastput  =  mettre  en  dernier  »  Donne  un  nouvel  objet  en  ajoutant  le  premier  element 
entre  a  la  suite  du  deuxieme. 

?lput  "5  "pi uriel 
pluriels 

?lput  "s  [pluriell 
[plunel  sJ 


memberp 

Repond  TRUE  (vrai)  si  le  premier  element  entre  est  un  element  du  deuxieme  objet  entre. 

?fflemberp  "y  "Elysee 

TRUE 

?ffiemberp    "chocolat    C  Lvani  1  leHchocol  at  Hf  raise!  J 

FALSE 

?memberp   Echocolat]    [[vanilleHchocolat ]Cf raise]] 

TRUE 

* 
numberp 

Repond  TRUE  {vrai)  si  Pobjet  entre  est  un  nombre. 

?numberp  374.926  Iiv:.,^. 

TRUE 

?nutnberp  "six 

FALSE 

?numberp  first  [2  4  6  8! 

TRUE 

•  is,- ,    ■ 
piece 
Donne  un  objet  con  tenant  les  elements  specifies  dans  l'objet  entre. 

?piece  4  7   "fenetres 

etre  .    . 

?piece   2   4    [Francois   daniel    herve  Olivier   fredenci 
[rjaniel   herve  alivier] 
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se 

(sentence  =  phrase)  Donne  la  liste  des  elements  entres  en  supprimant  les  crochets  (a  com- 
parer avec  list). 

?make  "instr  list  rl 

repeat  4  [fd~5fl  rt  90] 

?run  (se  "cs  :instr_list  "ht> 

Remarque  :  Le  tiret  s'obtient  en  actionnant  [SHIFTJO. 


shuffle 

Donne  une  liste  contenant  les  elements  de  la  liste  entree  dans  un  ordre  aleatoire. 

?shuffle    [abed] 
[c  b  d  a] 


UC  2  i 

Donne  le  mot  entre  avec  ses  caraclercs  alphabetiques  en  majuscules  (comparer  a\cc  1c). 

?uc  "jones 

JONES 


* 

where  "  ■  '  '  -4 

Donne  un  nombre  calcule  a  partir  de  1'expression  memberp  vraie  la  plus  recente.  "; 

?iiiemtjerp    "v   "riviere 

TRUE 

?show   where 

3 

word 

(mot)  Donne  un  seul  mot  a  partir  des  mots  ou  elements  entres. 

?word  "tele  "vision 
television 
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wordp 

Donne  la  reponse  TRUE  (vrai)  si  l'objet  entre  est  soit  un  mot,  soit  un  nombre. 

?«ardp  "banjour 
TRUE 

?wordp  [] 
FALSE 

Operations  arithmetiques : 

arctan 

Donne  1'arc-tangente  (en  degres)  du  nombre  entre. 

?arcUn    0 

0 

?arctan    i 
45 

cos 

Donne  le  cosinus  du  nombre  entre  en  degres. 

?COS    60 
0.500088800017849 

int 

Donne  la  partie  entiere  du  nombre  entre. 

?int   4/3 
1 

* 
quotient 

Donne  le  resultat  de  la  division  entiere  des  deux  nombres  entres. 

?quotient  14  4 

3 

?14/4 

3.5  . 
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random 

Donne  un  nombre  entier  positif  pris  au  hasard  et  inferieur  au  nombre  entre. 
?r«ndo«t   20 

* 
remainder 

Donne  le  resultat  entier  du  quotient  du  premier  nombre  entre  par  le  second. 

?re«airtder    7   3 

1 

?remainder    8  4 

0 


* 
rerandom 

Provoque  la  repetition  d'une  expression  aleatoire. 

?repeat  10  [(type  random  10  char  9)3 

375        3        20426 

?repeat    10  [(type  random   10  char  9)3 

9        9         10        6        13        5        1 
?rerandom 

?repeat    10  [(type   randoa    10   char    9)] 
*                     2        9        0        3        16        2        3        7 
?rerando* 

?repeat    10  [(type  random    10  char   9)3 

2-9  03        16237 


* 
round 

Donne  le  nombre  entre  arrondi  a  rentier  immediatement  superieur. 

?round  3.3333333 

3 

?round  3.5 

4 
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sin 

Donne  le  sinus  du  nombre  entre  en  degres. 

?sin  30 

0.500000000817049 


Donne  la  somme  des  nombres  entres. 

?+    2    2 
4 

?2  +  2 
4 


Donne  la  difference  des  deux  nombres  entres. 

?-    10    5 

5 

?10-5 

5 


Donne  le  produit  des  deux  nombres  entres. 

?*    4    6 
24 

?4*6 
24 


/ 

Donne  le  quotient  decimafcdes  deux  nombres  entres. 

?/   25  5 

5 

■>25/5 

5 
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Operations  logiques : 

and 

(et)  Repond  TRUE  (vrai)  si  le  resultat  de  toutes  les  expressions  entrees  est  vrai. 

?and    (3<4)    <7>4) 
TRUE 

not 

Repond  TRUE  (vrai)  si  Pexpression  entree  est  fausse. 
Repond  FALSE  (faux)  si  Pexpression  entree  est  vraie. 

?not  (3=4)  J 

TRUE  "% 

?not  (3=3) 

FALSE 

or 

(ou)  Repond  FALSE  (faux)  si  toutes  les  expressions  entrees  sont  fausses. 

?or  "TRUE  "FALSE                                        .-'I 

TRUE  M 

?or  (3=4)  (1=2)                                              -M 

FALSE  -.l| 

=  -iTBon  /!■■■■■  - 

Repond  TRUE  (vrai)  si  les  deux  expressions  entrees  sont  equivalentes ;  sinon  repond 
FALSE  (faux). 

?=   "IQSQ  "L08Q                                                                                                  ■  .  :-.53| 

TRUE  :.m 

?1=2  'v 
FALSE 

sytw  sw4.  rrt'  •'.'.  >':,")b  -'ab  'ami' ■■**--  '-  ■■'        ■'  ■■-:.■■■". 


Repond  TRUE  (vrai)  si  le  premier  element  entre  est  plus  grand  que  le  second ;  sinon 
repond  FALSE  (faux). 

?>  19  28 

FALSE 

?20>19 

TRUE 
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* 

thing 

Donne  la  valeur  de  la  variable  entree  sous  forme  de  nom 

?make   "ordinateur    "amstrad 
?thino    "ordinateur 
amstrad 

Procedures : 


* 
define 


Construil  la  procedure  definte  par  la  liste  et  portant  le  nom  specifie. 

?de-fine  "dire. bon jour  [[]  [pr  "bonjour]] 
?po  "dire. bonjour 
to  dire. bonjour 
pr  "bonjour 

.text  "dire. bon jour 
It]  Cpr  "bonjour]] 
end 

end 

Indique  la  fin  de  la  procedure.  Doit  etre  isole  au  debut  de  la  derniere  ligne  de  la  procedure. 

?to  carre 

>repeat  4  [fd  50  rt  90] 

>  e  n  d 

carre  defined   (carre  defini) 

?carre 


po 

(print  out  =  affichage)  Affiche  sur  1'ecran  la  procedure  designee  ou  la  valeur  des  variables 
specifiees. 

?po  "carre 

to  carre 

repeat  4  Cfd  50  rt  90] 

end 

?po  "x 

x  is  3    <x  est  3) 


I 
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pots 

(print  out  titles  =  affichage  des  titres)  Affiche  les  titres de  toutes  les  procedures  de  1'espace 

de  travail. 

?pots 

text 

Donne  la  liste  de  la  procedure  specifiee. 

?to  etoile  ;cinq  branches 

>repeat  5  Cfd  3B  rt  144  id   38  It  723 

>end 

etoile  defined 

?text  "etoile 

[[]  trepeat  5  lid   30  rt  144  fd  30  It  7213] 

to 

Indique  le  debut  de  la  construction  d'une  procedure. 

?to  carre 

>repeat  4  tid   50  rt  90] 

>end 

carre  defined  .  .■■..? 


Correction : 

ed 

Charge  sur  I'ecran  la  procedure  et/ou  les  variables  designees  dans  la  memoire  d'edition 
de  I'ecran. 

?ed   "carre 

* 
edall 

Charge  sur  I'ecran  toutes  les  variables  et  procedures  de  1'espace  de  travail  designees  dans 
la  memoire  d'edition  de  I'ecran  et  entrc  l'editeur  d'ecran. 

?edall 
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* 

Mtf 

Charge  directement  dans  la  memoire  d'edition  de  l'ecran  le  fichier  specifie,  ou  cree  un 
nouveau  fichier  en  entrant  Tediteur  d'ecran  avec  une  memoire  vide. 

?edf    "etoile 

Fonctions  dMmprimante 

* 

copy  on  ; ..,  j    ,  ; 

Provoque  l'impression  du  texte  par  echo. 

?copyon 

* 
copyoff 

Arrcte  l'impression  du  texte  par  echo. 

?copyof f  ■..;,;    b*3    ■■ 

f  9  •-■  '  ■ 

Ecran  texte: 

ct 

(clear  text  =  vidage  du  texte)  Efface  tout  le  texte  de  la  fenetre  ou  se  promene  le  curseur 

et  ramene  le  curseur  en  haut  a  gauche  de  celle-ci. 

?ct 

*       .  mi:      i  ■ 

cursor 

Donne  les  coordonnees  du  curseur  dans  la  fenetre  texte  (numero  de  colonne,  numcro  dc 
ligne). 

?ct 

?cursor 

m  n 

?<type  [la  position   actuelle  du  curseur   est\l   show 

cursor 

la  position  actuelle  du  curseur  est  t32  231 
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(print  =  afflche)  Affiche  les  objets  entres  au  clavier  sur  l'ecran  texte,  enleve  les  crochets 
d'une  liste  et  va  a  la  ligne  (a  comparer  avec  show  et  type). 

?pr    Ca  b   c3  [»   ' 

a   b    c 


-*s*m#?! 


* 
sctcursor 

Place  le  curseur  aux  coordonnees  specifiees. 

?ct 

?to  dessin 

>tnake  "x  random  20 
)uiake  "y  randaffl  12 
>setcursor    list    :x    sy  pr      I 

>end 
?de5sin 

setsplit 

Delimite  le  nombre  de  lignes  de  l'ecran  texte. 
?setsplit    10 


show 

Affichc  les  objets  entres  au  clavier  sur  l'ecran  texte,  garde  les  crochets  exterieurs  d'une 
liste  et  va  a  la  ligne  (a  comparer  avec  pr  et  type). 

7show  [a  b  c3 
U  b  cl 


ts 

(text  screen  =  ecran  texte)  Reserve  tout  l'ecran  pour  le  texte. 
?ts 
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type 

Affiche  les  objets  entres  au  clavier  sur  l'ecran  texte,  enleve  !es  crochets  d'une  liste  et  ne  va 

pas  a  la  ligne  (a  comparer  avec  pr  et  show). 

?type   ta  b   c] 
a   b    c 


L'ecran  graphique : 

Notez  que  l'ecran  est  en  mode  1,  a  4  couleurs,  et  que  1e  systeme  de  coordination  est  le 
meme  que  celui  du  BASIC  AMSTRAD.  En  d'autres  termes,  chaque  position  sur  l'ecran 
sera  arrondie  au  point  ecran  ayant  ie  numero  pair  le  plus  proche.  Les  quantites  de  rouge 
de  vert  et  de  bleu  pourront  varier  entre  0,  1  ou  2. 


dean 

(to  clean  =  nettoyer)  Efface  tout  l'ecran  graphique  sans  toucher  a  la  tortue. 

?fd   50 

?cleart 

cs  SI    .J... 

(clear  screen  =  vide  l'ecran)  Efface  l'ecran  graphique  et  ramene  la  tortue  en  position  fO  01 
tournee  vers  0  (le  nord)  et  avec  le  stylo  baissc. 

?rt   90   fd   50 
?cs 

dot 

Place  un  point  sur  l'ecran  a  la  position  specifiee  par  les  coordonnees  indiquees  et  selon  la 
couieur  de  stylo  en  cours. 

?dot    C50    10] 
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*. 

dote 

Donne  1e  numero  de  la  couleur  du  point  specific  par  les  coordonnees,  ou  -1  si  le  point 

n'est  pas  a  1'ecran. 

?cs  !*» 

?setpc    1 

?dot    -50    50  .  iqai  »itif?v 

?setpc  2 

?dot  50  50 

?setpc  3  '-•■' 

?dot  50  -50 

?dotc  50  50  « 

?dotc  -50  -50  -.■■■■  ***** 

0 

?dotc  1000  3000 

-1 

fence 

(barriere)  Pose  unc  barriere  qui  empeche  la  tortue  de  sortir  des  limites  de  1'ecran. 

window  enleve  cette  barriere. 

?fence 

Turtle  out  o*   bounds   (1*  tortue  ot   hor*  de*  lUites) 


fill 

Peint  une  7one  dans  la  couleur  du  stylo  en  cours  en  changeant  le  point  situe  sous  la  tortue 
euousls  pomis  contigus  horizontal  et  vcrticaux  en  utilisant  Tetat  du  stylo  en  cours. 

?*ake  "x  5 

?C5 
?5t 

?pd 

^repeat  30  t*d  sx  rt  ?B  make  "x  ;x  +  53 

?*d  20  rt  90 

?fd  10 

?pu 

?hame  ■■■       ••■.•■■■•  -  ;:■..■ 

?bk  2 
?pd 
?setpc  2 
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fs 

{full  screen  =  plein  ecran)  Reserve  la  totalite  de  l'ecran  au  graphique. 

pal 

(palette)  Donne  les  trois  nombres  representant  les  quantites  de  rouge,  vert,  bleu  du  stylo. 

?pil    2 
CB  2  23 

*  ■ 

setbg 

Change  la  couleur  de  fond  de  l'ecran  graphique  en  fonction  du  numero  de  couleur  spe- 
cific, 

CB  SS   5  FENCE    11 

(cette  instruction  definit  le  fond  a  la  couleur  0)  ■  .,. . 

?p*l    0 

[0  8  1] 

?setbq    2  .--.■:-*■■■ 

?sf 

C2  SS  5  FENCE   13 

setpal 

(set  palette  =  fabrication  des  couleurs)  Les  trois  chiffres  assignent  les  quantites  de  rouge, 

de  vert,  de  bleu  du  stylo. 

?setpal    3  tl    1   23 
?pal    3 
U    1    21 
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t  IIIHW 

setscrunch  .-....., 

Donne  au  rapport  de  I'ecran  graphique  la  valeur  du  nombre  specifie. 

?sf 

[0  SS  5  FENCE  11 

?to  cercle 

>repeat  3&0  lid  1  rt  11 

>end 

cercle  defined 

?setscrunch  2  ■■'..' 

?sf 

C0  SS  5  FENCE  23 

?cercle 

?set5crunch  2.5 

?cercle  ■  '"' "' 

sf 

(screen  facts  =  les  donnees  de  1'ecran)  Affiche  des  inf formations  su , -Kjl -  ■ fc  r&ran 
graphique.  La  structure  de  ces  informations  est  :[<couleur  de  fond>  <eUt  de  1  ecan  > 

<Tongiurdel-ecrantexte>  <fenetre>  <scrunch>]ou  <couleurdefond>  estlacouleur 
du  stylo  de  fond  (toujours  0  sous  CP./M  2.2).  <  etat  de  1'ecran  >  .nd.que  SS  (split  screen 
=  San  partage  .  FS  (full  screen  =  plein  ecran)  ou  TS  (text  screen  =  ecran  tota  emen. 
reserve  au  text?).  <  longueur  de  I'ecran  textc  >  est  le  nombre  de  lignes  "^  au  texte, 
et  <  fenetre  >  indique  WINDOW  (pas  de  barriere,  la  tortue  peut  sortir),  WRAP  (reappan- 
tion  de  la  tortue  de  1'autre  cote  de  I'ecran)  ou  FENCE  (barriere  -  la  tortue  ne  peut  pas 
sortir  des  limit*  de  I'ecran).  <  scrunch  > ,  le  rapport  d'ecran  (non  dispomble  sous  CP.  M 
2.2),  est  toujours  egal  a  1  par  defaut  et  peut  etre  modifie  par  SETSCRUNCH. 

?sf 

[0   SS   5   FENCE    H 


(split  screen  =  ecran  partage)  Reserve  au  texte  une  fenetre  sur  I'ecran  graphique. 
?ss 

window 

Permet  a  la  tortue  de  sortir  des  limites  de  I'ecran  apres  un  wrap  ou  un  fence. 

?fence  fd  308 
Turtle  out  of  bounds 
"'wi  ndow 
?fd  300 
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wrap 

Fait  apparaitre  la  tortue  du  cote  oppose  a  celui  ou  elle  sort. 

?cs  wrap 

?rt  5  fd  1800 

?  cs  window  ■  ;  33H3" 

?rt   5   fd    1000  *  i 


Les  graphismes  de  la  tortue : 
bk 

(back  =  arriere)  Deplace  la  tortue  du  nombre  de  pas  indique  dans  la  direction  opposee 
au  sens  de  la  fleche. 

?cs  fd    150 

?bk    50  ■  -t      ■ 

■  '■■■:  ^O  :,!:..  ■..-.■..   .,.  ■  . 

fd 

(forward  =  avant)  Avance  la  tortue  du  nombre  de  pas  indique  dans  le  sens  de  la  fleche. 
?fd   98 


Home 

■     33*3"*  «   ?': 

Replace  la  tortue  au  centre  de  1'ecran  graphique,  position  [O  O],  tournee  vers  0  (le  nord). 


?fd    180 
?rt   45 
?fd    180 

?rio*e 


r.t-i)  -.•<: 


woiwiw 


.  f .     ■  .:,  *  i  .-  . 


to-- 


1 


3 
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ht 

(hide  turtle  =  cache  tortue)  Rend  la  tortue  invisible.  Accelere  el  eferifie  te  dessin. 


?ht 

?cs   fd    50 

?5t 


It  W 

(left  =  gauche)  La  tortue  tourne  du  nombre  de  degres  indique  vers  la  gauche. 

?lt  98 


pd 

(pen  down  =  stylo  baisse)  Le  stylo  est  pose  sur  le  papier  et  la  tortue  peut  recommencer 
a  tracer  apres  interruption  par  la  primitive  pu. 

?fd  20  pu  fd  20 

?pd 
?fd  20 


pe 

(pen  erase  =  stylo  qui  efface)  Cette  instruction  transforme  la  couleur  du  stylo  en  0,  e'est- 
£e  la  couleur  du  fond,  et  permet  ainsi  d'effacer  les  tra.ts  sur  1  ecran. 

?fd  50 

?pe 

?hk  25 

1U  50 

?pd  fd  25 

pu 

(pen  up  =  stylo  leve)  Le  stylo  est  leve,  ne  laissant  plus  de  trace  sur  Tecran. 

?*d  30 
?pu 

?fd  30 

7pd  fd  30 
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p* 

(pen  exchange  =  stylo  inverse)  Change  la  couleur  de  tout  ce  qui  a  ete  trace  auparavant 

en  sa  couleur  opposee  ou  logiquement  complementaire. 

?fd  28  pu  fd  28 
?pd  setpc  3  fd  28 

?px 

?bk  88 
?+d  80 
?pd   bk    180 

Tt 

(right  =  droite)  La  tortue  tourne  du  nombre  de  degres  indique  vers  la  droite. 
?   rt    98 


seth 

(set  heading  =  changement  de  direction)  Tourne  la  tortue  dans  la  direction  spectfiee  en 

degres.  Les  nombres  positifs  font  tourner  la  tortue  dans  le  sens  des  aiguilles  d'une  montre, 
les  nombres  negatifs  en  sens  inverse. 

?seth    90 


setpc 

(set  pen  coulour  =  changement  de  la  couleur  du  stylo)  Le  stylo  prend  la  couleur  indiquee 
par  le  nombre  donne  (0  est  la  couleur  du  fond). 

?setpc    1 


setpos 

(set  position  =  changement  de  position)  Envoie  la  tortue  a  la  position  indiquee  par  les 
coordonnees  specifiees. 

?setpos  [30  28] 
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setx 

Change  la  position  horizontal  de  la  tortue  en  fonction  de  la  coordonnee  x  specifiee  (voir 

egalement  sety). 

?setx   80 
?*d   100 

?fd  50  ■■      ■''*■' 

sety 

Change  la  postion  verticale  de  la  tortue  en  fonction  de  la  coordonnee  y  specifiee. 

?sety  90 
?{d  20 
?sety  -50 
?fd  50 

St 

(show  turtle  =  montre  tortue)  Pour  rendre  visible  a  nouveau  une  tortue  invisible. 

?ht 

?+d   50 

?st  r.i,:y:- i-..r>  *i\r\K  .,..-.  toeTR  (men  s!  ■■■ 


tf 

(turtle  facts  =  donnees  de  la  tortue)  Affiche  une  liste  d'informations  concernant  la  tortue. 
Le  format  est :  [<coordx>  <coordy>  <direction>  <etat  du  stylo>  <couleur  du  stylo 
n>  <visibilite>]  ou  <coordx>  est  la  coordonnee  x  de  la  tortue ;  <coordy>  est  la  coor- 
donnee y  de  la  tortue ;  <direction>  indique  la  direction  vers  laquelle  se  tourne  la  tortue 
(en  degres)  ;  <  visibility  est  TRUE  (vrai)  lorsque  la  tortue  est  visible  ;  <etat  du  stylo > 
indique  PD  (pen  down  =  stylo  baisse),  PE  (pen  erase  =  stylo  qui  efface)  PX  (pen 
exchange  =  stylo  inverse),  PU  (pen  up  =  stylo  ieve) ;  <couleur  du  stylo  n>  identine  le 
numero  de  la  couleur  du  stylo  n. 

^setpos  [15  301 

?rt  60 

?  setpc  3 

->pe 

?ht 

?t* 

C 1 5  30  60  PE  3  FALSE] 


tatroduction  au  LOGO 
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towards  :■> 

Donne  une  direction  qui  pointe  la  tortue  vers  les  coordonnees  specifiecs. 
?seth    towards   list    :x    :y 

Gestion  de  I'espace  de  travail : 
er 

(erase  =  efface)  Efface  la  procedure  specifiee  de  I'espace  de  travail. 
?er  "car re 

erall 

Efface  toutes  les  procedures  et  les  variables  de  I'espace  de  travail. 

?erall 

era 

(erase  name  =  efface  le  nom)  Efface  la  ou  les  variables  specifiees  de  I'espace  de  travail, 

?make  "cote  [108] 

?make  "angle  [45] 

?:  cote  : angle 

C1U0] 

[45] 

?ern  [cote  angle! 

?:cote 

cote  has  no  value      (cote  ne  va'ut  rien) 

nodes 

Affiche  le  nombre  de  nceuds  disponible  dans  I'espace  de  travail. 

?nodes 


n 
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* 

nofonnat 

Supprime  de  l'espace  de  travail  le  formatage  de  la  procedure  et  les  commentaires  afin  de 
liberer  les  noeuds. 

?noformat 


* 
poall 

Affiche  les  definitions  de  toiites  les  procedure*  et  variables  de  I'espsce'drtravanY  ■ 

?poall 

* 
pons 

Affiche  les  noms  et  les  valeurs  de  toutes  les  variables  globales  de  l'espace  de  travail. 

?pons 

medium  is  40 

small    is    2B  ■ 

large   is   88  ,J*  " " ,  . 

pops 

Affiche  les  noms  et  les  definitions  de  toutes  les  procedures  de  l'espace  de  travail. 

?paps 

recycle 

Libere  le  plus  de  nceuds  possible  et  reorganise  l'espace  de  travail. 

?recycle 
?nodes 


si   saafiQs 

r    i  •»  f*  f  *'    ■ 
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Listes  de  propriete : 

glist 

(get  list  =  donne  la  liste)  Permet  d'obtenir  une  liste  de  tous  les  objets  de  l'espace  de  travail 
auxquels  on  a  attache  une  ou  des  proprietes. 

?glist    ".DEF 


gprop 

(get  property  =-  donne  la  propriete)  Permet  d'obtenir  h.  valeur  de  la  propriete  du  nom 
designe. 

?nake  "hauteur  "72 
?gprop  "hauteur  ".ftPV 
72 


(property  list  =  liste  des  proprietes)  Permet  d'obtenir  la  liste  des  proprietes  attachees  a 
un  mot. 

?plist    "hauteur 
C.APV  72] 

pprop 

(put  property  =  donne  une  propriete)  Permet  de  cfeer  un  lien  enfre  tm  rnolet  uiie  pro- 
priete. 

?pprop  "naitre  ".APV  "Corbeau 
?jmaitre 

Corbeau 


* 
pps 

Affiche  les  paires  de  proprietes  non  standard  de  tous  les  objets  de  l'espace  de  travail. 

?pprop  "Helene  "telephone  2132256 

?pps 

Helene's  telephone  is  213 

?plist  "Helene 

[telephone  2132256] 
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rem  prop 

(remove  property  =  elimine  la  propriete)  Elimine  la  propriete  specifiee  de  la  liste  de  pro- 
priete du  mot. 

?remprop    "»aitre   ",APV 

Fichiers  sur  disquette : 

* 

changef  ■"■!''  '"'"'■'  '■     '  ■ 

Change  le  nom  d'un  fichier  du  catalogue  de  la  disquette. 

[CERCLE  CARRE  ETQILE] 

?chanqe*  "boite  "carre 

?dir 

[CERCLE    BQITE    ETDILE3 


# 
defaultd 


Donne  le  nom  de  1'unite  par  defaut  en  cours. 


?de*aultd 
A: 


dir 


(directory  =  catalogue)  Permet  d'obtenir  une  liste  de  noms  de  fichiers  en  Dr.  LOGO  pre- 
sents sur  une  disquette,  soit  specifiee,  soft  prise  par  defaut ;  accepte  egalement  les  jockers. 


?dir  "a:???????? 


(Etudiez  la  partie  1  du  chapitre  intitule  «  AM SDOS  et  CP/M  »  pour  1'utilisation  des 

jockers????????  Dr.  LOGO  ne  tient  toutefois  pas  compte  du  jocker  *.) 
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dirpic 

Donne  une  liste  des  noms  de  fichiers  graphiques  de  I'unite  par  defaut  ou  specifiee. 

Accepte  les  noms  de  fichiers  ambigus. 

?dirpic  "b: 

[MQN.DESS  CARRES  ETDILES  CERCLES] 

isttoapab  it,- 

load 

Charge  le  fichier  specific,  de  la  disquette  sur  I'espace  travail  de  l'ordinateur. 

?1  oad    "*anfichier 
?load    "b:deasins 

*  *--■■■-■:■' ";  '" 

loadpic 

Recree  sur  1'ecran  graphique  le  dessin  sauvegarde  dans  le  fichier  graphique  specifie. 

? 1 oadp i c  "mon^dess 
?loadpic  "b:(non_dess 

?i(/r>j  if*  1'ip-(:>h  '':.•',  :  -.  '..-■'      ■'■■  ■   ■ 

save 

Ecrit  le  contenu  de  I'espace  travail  dans  un  fichier  sur  la  disquette  specifiee. 
?save   "dessins 


Remarque 

Avant  de  sauvegarder,  inserez  une  disquette  formatee  disposanl  d'une  capacite  suffisante. 

Ne  sauvegardez  pas  sur  une  disquette  systeme.  II  est  preferable  de  fermer  le  trou  de  pro- 
tection en  ecriture  pour  eviter  tout  risque  d'ecriture  accidentelle. 

Si  vous  utilisez  la  version  CP/M  2.2  du  Dr.  LOGO  (face  4  d'une  des  disquettes  systeme), 
veillez  a  cc  que  voire  disquette  de  travail  dispose  de  I'espace  necessaire  au  stockage  des 
programmes,  car  vous  ne  pouvez  pas  changer  de  disquette  en  cours  de  procedure. 
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savepic 

Ecril  le  contenu  de  I'ecran  graphique  dans  le  fichier  graphique  specifie. 

?«avepic  "«on_d8BS 
?savepic  "b'.monjless 

Remarque 

Avanl  de  sauvegarder.  inserez  une  disquette  formatee  disposant  d'une  capacite  suffisante. 
Ne  sauvcgardez  pas  sur  une  disquette  systeme.  II  est  preferable  de  termer  le  trou  de  pro- 
tection en  ecriture  pour  evitcr  tout  risque  d'ecriture  accidentelle. 

Si  vous  utilisez  la  version  CP/M  2.2  du  Dr.  LOGO  (face  4  d'une  des  disquettes  systeme), 
veillez  a  ce  que  voire  disquette  de  travail  dispose  de  1'espace  necessaire  au  stockage  des 
programmes,  car  vous  ne  pouvez  pas  changer  de  disquette  en  cours  de  procedure. 


* 

setd 

(setdrive)  Definit  l'unite  s 

jpecifiee  comn 

?deUultd 
ft: 

[BOITE    CERCLE   TRIAN6LE1 

?setd   b: 

?defaultd 

B: 

?dir 

CETOILE    MAIS0K3 

Clavier  et  manette  de  jeii : 

buttonp 

(button  pressed  =  bouton  appuyc)  Repond  TRUE  (vrai)  si  le  bouton  de  la  manette  de 
jeu  est  actionne.  Les  numeros  0  ct  1  servent  a  identifier  Ics  deux  manettcs  de  jeu. 

?to  tirer 

Mabel  "boucle 

>i-f  (buttonp  0)  Cpr  [tirer  0!]] 
>if  (buttonp  1)  [pr  [tirer  1!]] 
>go  "boucle 

>end 

La  position  de  la  manette  de  jeu  est  testee  par  padd  le. 
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Repond  TRUE  (vrai)  si  un  caractere  vicnt  d'etre  tape  au  clavier  et  attend  d'etre  enre- 
gistre. 

?to   inkey 

>ii   keyp  [op  re]   top  *]  * 


paddle 

Permet  de  connaitre  les  etats  de  la  manette  0  ou  1.  Les  differentes  positions  sont  codees 

comme  suit : 


Valeur  retournee 

Signification 

255 

Rien 

0 

En  haut 

I  ... 

En  haut  et  a  droite 

2 

A  droite 

3 

En  has  et  a  droite 

4 

En  bas 

5 

En  bas  et  a  gauche 

6 

A  gauche 

7 

En  haut  et  a  gauche 

t3J3**m 

?oaddle   0 

255 

bt** 


Les  boutons  de  tir  sont  testes  par  la  commande  buttonp. 

re 

(read  character  =  sortie  d'un  caractere)  Sort  le  premier  caractere  tape  au  clavier. 

?make    "touche   re 
...et  appuyez  sur  la  louche  X  : 

?:toucht 

X 


.»H>hv 
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(read  list  =  sortie  d'une  liste)  Donne  une  liste  contenant  une  entree  au  clavier  qui  doit 

etre  suivie  d'un  retour  chariot. 

?aake  "instrjist  rl         .   .  .-  PY''. " 
repeat  4  Ud   50  rt  90]  '  c  "* 

?:iostr  list 
[repeat~4  l  +  d  50  rt  90)] 


rq 

(read  quote  =  extraction  d'un  mot)  Donne  un  mot  contenant  une  ligne  entree  au  clavier, 
qui  doit  etre  suivi  d'un  retour  chariot. 

?make  "commands  rq 

repeat  3  Cfd  60  rt  1201 

?:co(R«ande 

repeat  3  [fd  60  rt   1201 


LESON: 

Seule  la  version  AMSTRAD  de  Dr.  LOGO  possede  des  commandes  pour  le  son.  Elles 
sont  d'ailleurs  identiques  a  leurs  equivalents  BASIC.  Reportez-vous  a  la  partie  9  du 
Cours  Elementaire  pour  plus  de  details. 

sound 

Met  un  son  dans  une  suite  de  sons  (queue).  Le  format  de  cette  instruction  est :  [<etat  de 
canal>  <periodesonore>  <duree>  <voIume>  <enveloppede volume >  <envelopoe<ie 
tonalite>  <  bruit >].  Tous  les  parametres  apres  duree  sont  facultatifs. 

?sound  [1  20  501 


env 

Construit  1'enveloppe  de  volume  (la  forme  de  la  note).  Son  format  est : 

[<numero  de  l'enveloppe  >  <section(s)  de  l'enveIoppe>] 

?env    tl    100   2   20] 
?sound    CI   200  300  5   11 


ijfaoduction  au  LOGO 
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ent 

Construit  l'en veloppe  de  tonalite.  Son  format  est :  [  <  numero  de  Penveloppe  >  <  section(s) 

de  Penveloppe  >] 

?ent  [1  100  2  28] 

?sound  tl  200  300  5  I  M       l8*" 

■ic*f  *i  »e  *ii' '■■'  ■ 

release 

Libere  les  canaux  dont  l'execution  a  ete  suspendue  par  la  commande  sound.  Les  canaux 

a  Iiberer  sont  indiques  par  le  code  suivant : 


Valeur  entree 

Cananx  liberes 

0 

Aucun 

1 

A 

2 

B 

3 

AetB 

4 

C 

5 

A  etC 

6 

BetC 

7 

A  et  B  et  C 

?release    1 

tli.' 

cist  4i  u  tt\: 


Les  commandes  de  derou  lenient  de  programme :  nun  wu-tnsb  •■- 

bye  .'* 

Lorsque  l'on  en  a  termine  avec  Dr.  LOGO, 

?bye 

Pour  continuer  apres  une  pause  provoquee  par  [CTRL]Z,  pause  ou  ERRACT. 
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go 

Execute  la  ligne  de  commande  reperee  par  une  etiquette  a  1'mterieur  d'une  procedure. 

>go   "boucle  >;    j  ■    - 


if 

Execute  une  ou  deux  listes  destructions  suivant  la  valeur  de  1'expression  entree ;  ces  hs- 
tes  en  toutes  lettres  doivent  etre  entourees  de  crochets. 

;>i-f  (sa>:b)  Lpr  la  est  plus  grand]! 
>H    (sa<sb)  tpr  lb  est  plus  grandl] 


label 

Pose  une  etiquette  sur  une  ligne  destruction  qui  pourra  ainsi  6tre  appelee  a  Taide  de  la 

commande  go. 

>Ubel    "boucle 


op 

(output  =  retourne)  Affiche  l'objet  entre  et  interrompf  la  procedure.     *   -*rw 
?op   IresultaU 

repeat 

Repete  la  liste  destructions  autant  de  fois  que  le  numero  le  specific 

?repe*t  4  Lfd  50  rt  90] 
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ran 

Execute  la  Hgne  d'instructions. 

?*ake  "instrjist  Ifd  40  rt   983 

?run    iinstr    list 


stop 

Interrompt  I'execution  de  la  procedure  en  cours  et  revient  au  niveau  superieur 
TOPLEVEL  (le  symbole  ?)  ou  a  la  procedure  d'appei. 

?stop 


wait 

Arrete  I'execution  de  la  procedure  pendant  le  temps  specific  par  le  nombre  entre. 

La  longueur  du  temps  de  pause  est :  nombre  entre  *  1/60  seconde. 
?wait  20 

Traitements  des  cas  particuliers  x  ■  •■    ■■■  ■>':*•:.■  <■■■>■         ■■■/.  ■-• 
catch 

(attrape)  Pour  traiter  une  erreur  ou  un  cas  particulier  qui  survient  pendant  I'execution 
d'une  serie  d'instructions. 

>catch   "error   [+  tl   []] 
>pr    [je  suis  ici] 
je  suis   ict 

error 

Donne  la  liste  d'instructions  qui  a  cause  la  derniere  erreur. 

>catch  "error  [execute  jusqu'a  I'erreur] 

>show   error 
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*  ■  .'itimiv 

notrace 

Desactive  trace  (voir  cette  commande). 
?notract 


* 
nowatch 


Desactive  watch  (voir  cette  commande). 

?nawatch 


pause 

Suspend  l'execution  de  la  procedure  en  cours,  permettant  ainsi  le  dialogue  entrc  Dr. 
LOGO  et  1'utilisateur. 

>if    :cote>5    [pause] 


throw 

Execute  la  ligne  destruction  identifiee  par  le  nom  entre  sous  catch. 
?thro«    "TOPLEVEL 

* 

trace 

Affiche  le  nom  de  chaque  procedure  en  cours  d'execution. 

?trace 

* 
watch 

Affiche  lc  nom  de  chaque  expression  en  cours  d'cxecution. 

?watch 
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Les  primitives  systeme : 
.contests 

Affiche  le  contenu  de  1'emplacement  des  symboles  de  Dr.  LOGO. 

.deposit 

Place  le  deuxieme  nombre  entre  a  remplacement  memoire  donne  par  le  premier  nombre. 
.examine 

Affiche  le  contenu  de  remplacement  memoire  specifie. 

Recherche  la  valeur  en  cours  de  I'entree  specifiee. 

.v.  SiL-i 
* 
out 

Envoie  la  valeur  introduce  vers  I'entree  specifiee, 
Les  variables  systeme : 

ERRACT 

Renvoie  au  niveau  superieur  TOPLEVEL/lorsque  TRUE  (vrai)  provoque  une  pause  au 
moment  d'une  erreur. 

FALSE 

Valeur  systeme. 
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REDEFP 

Quand  TRUE  (vrai)  permet  ia  redefinition  des  primitives. 

TOPLEVEL 

throw"TOPLEVEL  cios  toutes  les  procedures  en  attente. 

TRUE 

Valeur  systeme. 

Les  proprietes  du  systeme : 

.APV 

Valeur  de  la  vanable  associee  a  la  propriete ;  a  savoir  la  valeur  de  la  variable  globale. 

.DEF 

Definition  d'une  procedure 


.ENL 

Fin  d'une  ligne  de  procedure  interrompue  par  un  retour  chariot  ou  des  espaces. 

♦ 
.EMT 

Debut  d'une  ligne  de  procedure  interrompue  par  un  retour  chariot  ou  des  espaces. 


.PRM 

Identifie  une  primitive. 

.REM  (ou;) 

Rcmarques  ou  commentaires. 
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Chapitre  7 

Pour  information... 


Ce  chapitre  fournit  les  informations  de  reference  susceptibles  de  vous  aider 
a  utiliser  votre  ordinateur. 

Sujets  abordes : 

*  Deplacements  du  curseur  et  fonctions  des  codes  de  controle 

*  Interruptions 

*  Caracteres  graphiques  et  ASCII 

*  References  cles 

*  Sons 

*  Messages  d'erreur 

*  Mots  cles  du  BASIC 

*  Grilles 

*  Connexions 

*  Imprimantes 

*  Manettes  de  jeu 

*  Organisation  des  disques 

*  Memoire 

*  Organisation  des  disques 

*  Extensions  residentes  du  systeme  (RSX) 

*  Memoire 

*  Emulateur  de  terminaux  sous  CP/M  Plus 

*  Jeu  de  caracteres  sous  CP/M  Plus 

Pour  des  informations  completes  sur  le  BASIC  et  les  microprogrammes 
du  6128,  consultez  respectivement  les  manuels  SOFT  967  et  SOFT  968 
d'AMSOFT. 

Partie  1  :  Deplacements  du  curseur 
et  fonctions  des  codes  de  controle 

Dans  un  certain  nombre  de  progiciels  (cm  programmes  duplication),  le  curseur  de  texte 
peut  se  trouver  a  l'exterieur  de  la  fenetre  utilisee.  Certaines  operations  commencent  par 
ramener  le  curseur  a  sa  position  legale.  Ce  sont : 
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1.  L'ecriture  d'un  caractere  >f?Ot  T  *<■ '  ' 

2.  Le  dessin  du  bloc  du  curseur 

3.  L'cnvoi  d'un  code  de  controie  marque  d'un  asterisque  dans  les  pages  suivantes. 

La  procedure  qui  ramene  le  curseur  a  une  position  legale  est  la  suivante : 

1.  Si  le  curseur  est  completement  a  droite,  il  est  ramene  a  l'extreme  gauche  de  la  ligne 
suivante. 

2.  S'il  se  trouve  a  gauche  du  bord  gauche,  il  est  ramene  a  droite  sur  la  ligne  precedente. 

3.  Si  le  curseur  est  au-dessus  du  bord  superieur,  Pensemble  de  la  fenetre  descend  alors 
d'une  ligne  et  le  curseur  se  place  sur  la  premiere  ligne. 

4.  Si  le  curseur  est  en  dessous  du  bord  inferieur,  Pensemble  de  la  fenetre  monte  alors  d'une 

ligne  et  le  curseur  se  place  sur  la  derniere  ligne. 

Les  tests  et  operations  se  font  dans  l'ordre  indique.  Les  positions  de  curseur  illegales  peu- 
vent  s'exprimer  par  un  nombre  nul  ou  negatif,  correspondant  a  la  position  a  l'exterieur 
du  bord  gauche  ou  au-dessus  d'une  fenetre.  Les  valeurs  de  caractere  de  0  a  31  ne  pro- 
duisent  rien  sur  Pecran  et  ne  devraient  pas  etre  utilisees  inconsiderement.  Certains  codes 
changent  la  signification  du  ou  des  caracteres  qui  les  suivent,  les  considerant  comme  para- 
metres  d'une  fonction  particuliere. 

S'il  est  genere  a  partir  du  clavier,  un  code  de  controie  envoye  a  Pecran  graphique  provo- 
que  simplement  Paffichage  du  symbole  conventionnel  correspondant  a  sa  fonction  (exem- 
ple :  &07'BEL'  -  [CTRL]G).  II  ne  remplit  sa  fonction  de  controie  qu'envoye  par  l'une 
des  commandes  suivantes  : 

PRINT  CHR$  (&07),  ou  PRINT  "^  '*  (5^s'obtient  en  appuyant  sur  [CTRL]G  a 
1'interieur  de  Pinstruction  PRINT). 

Les  codes  marques  d'un  asterisque  *  commencent  par  forcer  le  curseur  a  se  rendre  sur 
une  position  legale  -  mais  peuvent  laisser  le  curseur  dans  une  position  non  legale.  Les 
codes  sont  indiques  d'abord  avec  leur  valeur  hexadecimale  (&XX)  puis  ('equivalent 
decimal. 
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Codes  de  contrdle 


Valeur  Norn 

600  0  NUL 

601  1  SOH 

602  2  STX 

603  3  ETX 


Parametre 


0a255 


&04  4        EOT  0  a  2 


&05  5 

ENQ 

0  a  255 

&06  6 

ACK 

&07  7 

BEL 

&08  8* 

BS 

Fonction 

Pas  d'effet.  Ignore. 

Affiche  le  symbole  correspondant  a  la 
valeur  du  parametre.  Permel  ainsi 
l'affichage  des  symboles  de  0  a  31 . 

Supprime  le  curseur  de  texte.  Equivaut 
a  la  commande  CURSOR  accompa- 
gnee  d'un  parametre  utilisateur  egal  a  0. 

Active  le  curseur  de  texte.  Equivaut  a  la 
commande  CURSOR  accompagnee 
d'un  parametre  utilisateur  egal  a  1.  Pour 
afficher  un  curseur  a  l'interieur  d'un 
programme  en  BASIC  (autre  que  le  cur- 
seur automatique  genere  par  le  BASIC 
en  attente  d'une  entree  au  clavier),  il 
faut  faire  appe!  a  une  commande 
CURSOR  avec  un  parametre  systeme 
egal a  1. 

Active  le  Mode  ecran.  Valeur  du  para- 
metre modulo  4.  Equivaut  a  une  com- 
mande MODE. 

Envoie  le  caractere  code  par  le  parame- 
tre a  la  position  du  curseur  graphique. 

Active  1'ecran  de  texte  (voir  &1 5  NAK). 

Fait  sonner  la  cloche.  (Vide  les  files  d'at- 
tente  des  canaux  sonores). 

Deplace  le  curseur  d'une  colonne  a 

gauche. 


Pour  information. 
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Valenr 

Nona 

Parametre 

Fonction 

&09     9* 

TAB 

Deplace  le  curseur  d'une  colonne  a 

droite. 

&0A  10  * 

LF 

Deplace  le  curseur  d'une  ligne  vers  le 
bas. 

&OBU  * 

VT 

Deplace  le  curseur  d'une  ligne  vers  le 
haut. 

&0C  12 

FF 

Efface  l'ecran  de  texte  et  place  le  curseur 
en  haut  a  gauche  ;  equivaut  a  une  com- 
mande  CLS- 

&0D  13  * 

CR 

Amene  le  curseur  jusqu'au  bord  gauche 
de  la  fenetre  sur  la  ligne  courante. 

&0E14 

SO 

0al5 

Definit  1'Encredu  Papier  =  Commande 
PAPER 

Valeur  du  parametre  modulo  16. 

&0F15 

SI 

0a  IS 

Definit  l'Encre  du  stylo  =  Commande 
PEN. 

Valeur  du  parametre  modulo  16. 

&10  16* 

DLE 

Efface  le  caractere.  Remplit  la  matrice 
du  caractere  avec  la  couleur  du  Papier. 

All  17* 

DC1 

Efface  depuis  le  bord  gauche  de  la  fene- 
tre jusqu'au  caractere  courant,  en  rem- 
plissant    les    matrices    de    caractere 
concemees  avec  l'encre  du  Papier. 

&12  18  • 

DC2 

Efface  a  partir  du  caractere  courant 

(inclus)  jusqu'au  bord  droit  de  la  fene- 
tre. Remplit  les  matrices  de  caracteres 
concemees  avec  l'encre  du  papier. 

&13  19* 

DC3 

Efface  depuis  le  debut  de  la  fenetre  jus- 
qu'au caractere  courant.  Remplit  avec 
l'encre  du  Papier. 
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Valeur  Nom  Parametre 

614  20*  DC4 

615  21  NAK 

616  22  SYN  0  a  1 

617  23  ETB  0a3 


&18  24 

CAN 

&19  25 

EM 

0a255 

0a255 
0a255 
0a255 
0a255 
0a255 
0a255 
0a255 
Oa255 

&1A26 

SUB 

la  80 

1  a  80 
1  a  25 

1  a  25 

Fonction 

Efface  a  partir  du  caractere  jusqu'a  la 
fin  de  la  fenetre.  Remplissage  avec  l'en- 
cre  du  Papier. 

Desactive  I'ecran  de  texte.  Rien  ne 

s'affichera  jusqu'a  ce  qu'un  caractere 
ACK  (&066)  ait  ete  envoye. 

Parametre  modulo  2.  0  supprime  le 
mode  transparent,  1  etablit  le  mode 
transparent. 

Parametre  modulo  4.  0  valide  le  mode 
d'Encre  Graphique  NORMAL 

1  valide  le  mode  d'Encre  Graphique 
XOR  (ou  exclusif) 

2  valide  le  mode  d'Encre  Graphique 
AND  (et) 

3  valide  le  mode  d'Encre  Graphique  OR 
(ou  inclusif) 

Echange  des  encres  papier  et  stylo. 

Equivaut  a  la  commande  SYMBOL. 
Admet  neuf  parametres  dont  le  premier 
concerne  le  code  du  caractere  ;  les  sui- 
vants  correspondent  chacun  a  une  ligne 
de  la  matrice  des  caractcres.  Le  bit  de 
poids  le  plus  fort  du  ler  octet  corres- 
pond au  point  superieur  gauche  du 
caractere,  tandis  que  le  plus  faible  cor- 
respond a  son  point  inferieur  droit. 

Etablit  la  fenetre  =  commande  WIN- 
DOW. Les  deux  premiers  parametres 
definissenl  les  bords  gauche  et  droit,  la 
plus  petite  valeur  correspondant  au 
bord  gauche  et  la  plus  grande  au  bord 
droit.  Les  deux  derniers  parametres 
definissent  les  bords  superieur  et  infe- 
rieur. La  plus  petite  valeur  correspond 
au  bord  superieur  et  la  plus  grande  au 
bord  inferieur. 
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Valeur 

Norn 

Parametre 

&!B27 

ESC 

&IC28 

FS 

Oa  15 
Oa3I 
0  a  31 

&1D29      GS 


0  a  31 
Oa31 


&1E30 

RS 

&1F31 

US 

1  a  80 
la  25 

Fonction 

Pas  d'effet.  Ignore. 

Attribue  deux  couleurs  a  une  encre. 
Equivaut  a  une  commande  INK.  Le  pre- 
mier parametre  delink  ie  numero  de 
1 'encre  (modulo  16),  les  sutvants  definis- 
sent  les  couleurs  (modulo  32).  Les 
valeurs  des  parametres  27  a  31  corres- 
pondent a  des  couleurs  non  definies. 

Attribue     deux     couleurs     au     cadre 

(border).    Equivaut  a   la   commande 

BORDER. 

Les  deux  parametres  (modulo  32)  spe- 

cifient  les  deux  couleurs.  Les  valeurs  27 

et  31  sont  indefinics. 

Amene  le  curseur  vers  le  coin  superieur 
gauche  de  la  fenetre. 

Amene  le  curseur  a  une  position  donnee 
dans  la  fenetre  courante.  Equivaut  a  une 
commande  LOCATE.  Le  premier  para- 
metre specific  ta  colonne,  le  deuxieme 
specirle  la  ligne. 


L'organisation  interne  du  6128  est  assuree  par  un  systeme  d'exploitation  perfectionne 
travaillant  en  temps  reel.  Le  systeme  d'exploitation  gere  le  «  trafic  des  informations  » 

dans  Fordinateur  depuis  les  entrees  jusqu'aux  sorties. 

II  sert  principalement  de  lien  entre  la  machine  et  I'interpreteur  BASIC  -  pour  les  couleurs 
clignotantes.  par  exemple,  le  BASIC  passe  les  parametres  au  systeme  d'exploitation  qui 
organise  le  travail.  L'un  determine  ce  qu'il  faut  faire  el  1'autre  quand  il  faut  le  faire. 

Le  systeme  d'exploitation  fait  partie  du  logiciel  integre  a  la  machine  (que  les  anglais 

appellenl  firmware,  e'est-a-dire  melange  de  hardware  et  de  software).  II  contient  les  routi- 
nes en  code  machine  appelees  par  le  BASIC. 


Chapitre  7    Page  6 


Pour  information... 


Si  vous  desirez  experimenter  les  commandes  POKE  et  CALL,  commencez  par  sauvegar- 
der  et  lister  votre  programme,  car  vous  risqueriez  de  regretter  vos  manoeuvres.  Depassant 
l'objectif  de  cet  ouvrage.  le  systeme  Sexploitation  du  logiciel  est  decnt  en  detail  dans  le 
manuel  SOFT  946. 

Pour  programmer  en  code  machine,  vous  dcvez  faire  appel  a  un  assembleur.  L'asscm- 
bleur  DEVPAC  d'AMSOFT  comprend  un  assembleur  Z80  translatable,  un  editeur,  un 

desassembleur  ct  un  monileur. 

Partie  2  :  Interruptions  de  programme 

Pour  implementer  plusieurs  informations  multi-taches.  le  6128  fait  appel  aux  interrup- 
tions du  Z80,  dont  AFTER  et  EVERY  sont  des  exemples.  Voici  1'oidre  de  pnonte  des 
compteurs  d'evenement : 

Rupture  ([ESC]  [ESC]) 

Compteur  3 

Compteur  2  (et  les  3  files  d'attente  des  canaux  sonores) 

Compteur  1 
Compteur  0 

Les  interruptions  doivent  tenir  comptc  des  ctats  intermediates  d'unc  variable.  Le  sous- 
programme  d'interruption  doit  cviter  les  interactions  indesirablcs  avec  1'etat  des  variables 

du  programme  principal. 

Les  files  d*attente  des  canaux  sonores  ont  des  interruptions  de  meme  priorite.  Ainsi,  lors- 
que  le  sous-programme  d'interruption  d'une  file  d'attente  d'un  canal  sonore  s  execute,  il 
ne  pcut  etrc  interrompu  par  aucune  autre  file  d'attente.  Ceci  permct  aux  sous-program- 
mes d' interruption  de  partager  des  variables  en  evitant  les  incidences  facheuses  que  nous 
venons  d*evoquer. 

Quand  une  interruption  propre  a  la  file  d'attente  d'un  canal  sonore  a  ete  autorisee  (a 
l'aide  de  ON  SQ  GOSUB).  elle  est  immediatcment.pnse  en  compte  si  la  tile  concernant 
le'  canal  nest  pas  plcine.  Dans  le  cas  contrairc.  elle  se  produit  a  la  fin  de  la  generation 
sonore  courante  (s'il  restc  de  la  place  dans  la  file).  Le  fail  d'etre  interrompu,  devahde 
Pevenement  de  sorte  que  le  sous-programme  d'interruption  doit  proccder  a  la  reauionsa- 
tion  pour  que  d'autres  interruptions  soient  susceptibles  d'intervenir. 

La  tentative  de  generer  un  son  et  de  tester  1'etat  de  la  file  a  egalement  pour  consequence 

de  devalider  une  interruption. 
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Partie  3  :  Caracteres  ASCII  et  graphiques 


ASCII 


A  titre  de  reference,  nous  reproduisons  ici  le  jeu  de  caracteres  standard  ASCII  avec  la 
notation  decimale.  octale  et  hexadecimale.  Les  pages  suivantes  donnent  le  detail  de  cha- 
que  matrice  de  caracteres  du  6128. 


oeci 

OCTAL 

HEXA 

-    Caracteres  ASCII 

DECI. 

OCTAt 

HEXA.  ASCII 

DECI. 

OCTAL 

HEXA 

ASCII 

0 

000 

00 

NUL ICTRL13) 

SO 

062 

32 

2 

100 

144 

64 

d 

1 

001 

01 

SOHflCTRCJA) 

51 

063 

33 

3 

101 

145 

65 

e 

2 

002 

02 

STX((CTRI_1B) 

52 

064 

34 

4 

102 

146 

66 

f 

3 

003 

03 

ETX{|CTRL|C) 

53 

065 

35 

5 

103 

147 

67 

g 

4 

004 

04 

EOTJCTRLID) 

54 

066 

36 

6 

104 

150 

68 

rt 

5 

005 

05 

ENQ  (|CTRL)E) 

55 

067 

37 

7 

105 

151 

69 

T 

6 

006 

06 

ACK(|CTRL)F) 

56 

070 

38 

8 

106 

152 

6A 

j 

7 

007 

07 

BEL([CTRL]G) 

57 

071 

39 

9 

107 

153 

6B 

k 

a 

010 

08 

BS((CTRl)H) 

58 

072 

3A 

108 

154 

6C 

I 

9 

011 

□9 

HT  |[CTRL]I) 

59 

073 

3B 

109 

155 

6D 

Ml 

10 

012 

OA 

LFflCTRLJJ) 

60 

074 

3C 

< 

110 

156 

6E 

n 

11 

013 

OB 

VT([CTRL]K) 

61 

075 

3D 

= 

111 

157 

6F 

0 

12 

014 

OC 

FF((CTRL)L) 

62 

076 

3E 

> 

112 

160 

70 

p 

13 

015 

OD 

CR  (|CTRL|M) 

63 

077 

3F 

7 

113 

161 

71 

q 

14 

016 

OE 

SO([CTRL)N) 

64 

100 

40 

(S 

114 

162 

72 

r 

15 

017 

OF 

SI  ((CTRL|0) 

65 

101 

41 

A 

115 

163 

73 

s 

16 

020 

10 

DI£([CTRI_1P) 

66 

102 

42 

9 

116 

164 

74 

t 

17 

021 

11 

OC1  (ICTRL)Q) 

67 

103 

43 

C 

117 

165 

75 

u 

18 

022 

12 

DC2  ((CTRLIR) 

68 

104 

44 

D 

116 

166 

76 

V 

19 

023 

13 

OC3((CTRL]S) 

69 

105 

45 

E 

119 

167 

77 

y 

20 

024 

14 

DC4  ([CTRLJT) 

70 

106 

46 

F 

120 

170 

78 

X 

21 

025 

15 

NAK  (IGTRL)U) 

71 

107 

47 

G 

121 

171 

79 

y 

22 

026 

16 

SYN   (ICTRLJV) 

72 

110 

48 

H 

122 

172 

7A 

z 

23 

027 

17 

ETB([CTRI_JW) 

73 

111 

49 

I 

123 

173 

7B 

{ 

24 

030 

18 

CAN  ([CTRL]*) 

74 

112 

4A 

J 

124 

174 

7G 

I 

25 

031 

19 

EM  (ICTRL)Y) 

75 

113 

4B 

K 

125 

175 

7D 

} 

26 

032 

1A 

SUB  ((CTRl)Z) 

76 

114 

4C 

L 

126 

176 

7E 

2? 

033 

1B 

ESC 

77 

115 

4D 

H 

28 

034 

1C 

FS*1 

78 

116 

4E 

N 

29 

035 

1D 

GS 

79 

117 

4F 

0 

30 

036 

IE 

RS 

80 

120 

50 

P 

31 

037 

IF 

US 

81 

121 

51 

8 

32 

040 

20 

SP 

82 

122 

52 

R 

33 

041 

21 

; 

S3 

123 

53 

S 

34 

042 

22 

" 

84 

124 

54 

T 

35 

043 

23 

# 

85 

125 

55 

U 

36 

044 

24 

$ 

86 

126 

56 

V 

37 

045 

25 

X 

87 

127 

57 

w 

38 

046 

26 

a 

88 

130 

58 

X 

39 

047 

27 

■ 

89 

131 

59 

Y 

40 

050 

28 

( 

90 

132 

5A 

1 

41 

051 

29 

) 

91 

133 

5B 

I 

42 

052 

2A 

* 

92 

134 

5C 

\ 

43 

053 

2B 

+ 

93 

135 

5D 

3 

44 

054 

2C 

t 

94 

136 

5E 

t 

45 

055 

2D 

95 

137 

5F 

_ 

46 

056 

2E 

96 

140 

60 

47 

057 

2F 

) 

97 

141 

61 

a 

48 

060 

30 

9 

98 

142 

62 

b 

49 

061 

31 

1 

99 

143 

63 

c            1 
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Le  jeu  de  caracteres  particulier  du  61 28 

Les  caracteres  represents  ici  sont  contenus  dans  la  matrice  standard  8x8  utilisec  pour 
l-aflichaRC  du  6128.  L'utilisateur  peul  genercr  des  caracteres  ct  les  grouper  ou  les  ah- 

gner  pour  obtcnir  divers  effets  speciaux  (voir  le  paragraphe  «  Caracteres  dehms  par  1  utih- 
sateur  »  du  chapitrc  «  A  vos  heures  de  loisir...  »). 


x 


rr  ■■ 

--■S 

--■S 
:__■■ 


33 
&H21 

&X001 00001 


37 

&H25 

&X00100101 


m 


41 

&H29 

&X00101001 


45 

&H2D 
&X00101101 


34 

&H22 

&X001 00010 

i in  in 


38 

&H26 

&X00100110 


m 


42 

&H2A 

&X00101010 


46 

&H2E 

&X00101110 


35 

&H23 

&X00100011 

mm 

i 

i 

i  _ 

39 

&H27 

&X00100111 


&X00101011 


s 


H  M 


47 

&H2F 
&X00101111 


32  &H20 

&X001 ooooo 


36 

&H24 

&X00100100 


40 
&H28 

&X001 01000 


B:;: 


44 

&H2C 

&X00101100 


48 

&H30 

&X001 10000 
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"■■■■■■ ' 
i  i  i  i  i Ti 


M 

.■■Tag: 
■■■■■■ 

n  1 1  n  - 


H 


m 


49 

&H31 
&X001 10001 


50 

&H32 
&X001 10010 


51 

&H33 

&X0Q1 10011 


52 

&H34 

&X001 10100 


m 


1 1  in::        Tmm : 


SB 


53 

&H35 

&X00110101 


54 
&H36 

&X00110110 


55 

&H37 

&X00110111 


56 

&H38 

&X00111000 


«■::: 


m 


m 


57 

&H39 

&X00111001 


58 

&H3A 
&X001 11010 


59 

&H3B 
&X001 11011 


60 

&H3C 

&X00111100 


■www 


m 


m^ 


61 

&H3D 

&X00111101 


62 

&H3E 

&X00111110 


63 

&H3F 

&X00111111 


64 

&H40 
&X01 000000 


■FfH 


if 


as 


65 

&H41 

&X01 000001 


66 

&H42 

&X01000010 


67 

&H43 

&X01000011 


68 

&H44 

&X01000100 
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69 

&H45 

&X01000101 


70 

&H46 

&X01000110 


71 

&H47 

&X010OO111 


72 

&H48 
&X010O10O0 


frrtvr\ 


73 

74 

&H49 

&H4A 

&X01 001001 

&X01001010 

75 

&H4B 

&X01001011 


76 

&H4C 

&X01001100 


77 

&H4D 

&X01001101 


78 

&H4E 

&X01001110 


79 

&H4F 

&X01001111 


80 

&H50 

&X01010000 


81 

&H51 

&X01O10O01 


82 

&H52 

&X01 010010 


Sff 


83 

&H53 

&X01010011 


84 

&H54 

&X01010100 


85 

&H55 

&X01010101 


86 

&H56 

&X01010110 


87 

&H57 

&X01010111 


88 

&H58 

&X01011000 
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89 

&H59 

4X01011001 


90 

&H5A 

&X01011010 


91 

4H5B 

4X01011011 


fiS 


m 


92 

4H5C 

4X01011100 


93 

4H5D 

4X01011101 


94 

4H5E 

&X01011110 


! 


95 

&H5F 

&X01011111 


e 


■p= 


96 

4H60 

4X01100000 


1 1 Til  IT : 


97 

4H61 
&X01 100001 


98 

4H62 

4X01100010 


99 

4H63 
&X01 100011 


100 
4H64 
&X01 100100 


101 

&H65 

4X01100101 


102 

&H66 

4X01100110 


103 

4H67 

4X01100111 


104 

&H68 

4X01101000 


105 

4H69 

4X01101001 


106 
4H6A 
4X01 101010 


107 

&H6B 

4X01101011 


;fflH=; 


108 

4H6C 

4X01101100 
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109 

&H6D 

&X01101101 


110 

&H6E 

&X01101110 


111 

&H6F 
&X01101111 


112 
&H70 
&X011 10000 


P 

as 


113 

&H71 

&X01110001 


114 

&H72 

&X01 110010 


fete 

rrrm  i 


115 
&H73 
&X01 110011 


116 

&H74 

SX01110100 


117 

&H75 
&X01 110101 


118 

&H76 

&X01110110 


119 
&H77 
&X01 110111 


120 

&H78 

&X01111000 


121 

&H79 
&X01111001 


122 

&H7A 

&X01111010 


123 

&H7B 

&X01111011 


124 
&H7C 
&X01 111100 


HE 


I 


125 

&H7D 

&X01111101 


srsffi 


126 

&H7E 

&X01111110 


127 

&H7F 

&X01111111 


128 

&H80 

&X10000000 
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6 


IILLJIII 

■■■■ 
■■■■ 

I  M  ■ 

129 

&H81 

&X10000001 


uw 


■■■■ 

m 


130 

131 

*H82 

&H83 

&X10000010 

&X10000011 

III 

■■ 

■1 

■■ 

II 

■ 

■ 

■■ 

132 

&H84 

&X1 00001 00 


133 

&H85 

&X1 0000 101 


■■■■ 
■■■■ 

■HI 
■■■■ 
■■■■ 

■ 
■ 
■ 

■9 
■9 

■■■■_ 

■■■st 

■■■S- 

■■■■E 

134 

135 

&H86 

&H87 

&X10000110 

&X10000111 

■■■ 
■■■ 
■■■ 
■■■ 


136 

&H88 

&X1 0001000 


137 

&H89 

&X1 0001001 


138 

&H8A 

&X10001010 


JUUUBBBI 


139 

&H8B 

&X1 0001011 


1 


140 

&H8C 

&X10001100 


141 

&H8D 

&X10001101 


■■■■■■■I 


142- 

&H8E 

&X1000111O 


■■■■■■■I 

■■■■■■■I 
■■■■■■■I 
■■■■■■■I 
■■■■■■■I 

■■■■■■ 

143 

&H8F 

&X1 00011 11 


■■ 

-_Jw_ 


144 

&H90 

&X1 001 0000 


ffl 


!_■■■■■ 

il 


145 

&H91 

&X1O010001 


146 

&H92 

&X1 0010010 


147 

SH93 

&X10010011 


I 


148 

&H94 

&X10010100 


Chapilre  7    Page  14 


Pour  information. . 


149 

&H95 

&X10010101 


150 

&H96 

&X10010110 


m 


151 

&H97 

&X10O10111 


■■■■■■ _  _ 


152 

&H98 

&X1O01100O 


153 

&H99 

&X1 001 1001 


mm 


154 

&H9A 

&X10011010 


155 

&H9B 

&X10011011 


156 

&H9C 

&X10011100 


157 

&H9D 

&X10011101 


158 

&H9E 

&X10011110 


m  sii 


159 

&H9F 

&X10011111 


II; 


160 

&HA0 

&X1 0100000 


161 
&HA1 
&X101 00001 


162 

&HA2 

&X10100010 


163 

&HA3 

&X10100011 


164 

&HA4 

&X101O0100 


r««B 


a 


FSB 


165 

&HA5 

&X101001O1 


IF 


166 

&.HA6 

&X10100110 


167 

&HA7 

&X10100111 


M 


168 

&HA8 

&X1 0101000 
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169 
&HA9 
&X101 01001 


170 

&HAA 

&X1Q10101O 


nn 


fflE 


171 

&HAB 
&X10101O11 


ffiffl 


m 


172 

&HAC 

&X10101100 


I 


otbe 


Se 


173 

&HAD 

&X10101101 


174 

&HAE 

&X10101110 


175 

&HAF 

&X10101111 


176 
&HB0 
&X101 10000 


177 

&HB1 

&X10110001 


178 

&HB2 

&X10110010 


assg 


is? 


179 

&HB3 

&X1 01 10011 


180 
&HB4 

&X10110100 


181 

&HB5 

&X10110101 


■ 


182 

&HB6 
&X10110110 


183 

&HB7 

&X10110111 


184 

&HB8 

&X10111000 


m 


185 

&HB9 

&X10111001 


# 


186 
&HBA 
&X101 11010 


187 

&HBB 

&X10111011 


188 

&HBC 

&X10111100 
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189 

&HBD 

4X10111101 


190 

&HBE 

&X10111110 


191 

&HBF 

&X10111111 


192 

&HC0 

&X1 1000000 


m 


193 

&HC1 

&X11000001 


^iisS    fe 


194 

&HC2 

&X11000010 


195 

&HC3 

&X11000011 


196 

&HC4 

&X1 10001 00 


m 


197 

&HC5 

&X1 10001 01 


198 

&HC6 

&X11000110 


199 

&HC7 

&X11000111 


200 

&HC8 

&X11001000 


m 


m 


201 

&HC9 

&X1 1001001 


m 


202 

&HCA 

&X1 1001 010 


203 
&HCB 
&X1 1001 011 


204 

&HCC 

&X1 1001 100 


205 

&HCD 

&X11001101 


206 

&HCE 

&X1 1001 110 


207 

&HCF 

&X11001111 


MHUWU 


208 

&HD0 

&X1 1010000 
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209 

&HD1 

&X1 1010001 


■■■■■■■I 

■■■■■■■■ 


210 

&HD2 

&X11010010 


211 

&HD3 

4X11010011 


212 

&HD4 

&X1 1010100 


m 


213 

&HD5 

&X11010101 


I  ■ 

■■ 

_-.    ■■■ 

_    ■■■■ 

■■■■■ 

■■■■■■ 


214 

&HD6 

&X1 1010110 


■■■■  : : : 


■■■■»_ 
■■■■■■ 


215 

&HD7 

&X1 10101 11 


■ 


216 

&HD8 

&X11011000 


■ 


217 

&HD9 

&X11011001 


218 

&HDA 

&X11011010 


219 

&HDB 

&X11011011 


220 

&HDC 

&X11011100 


221 

SHOD 

&X11011101 

FFtm 

■■i  ■■■ 

225 

&HE1     ' 
&X1 1100001 


222 

&HDE 

&X11011110 


226 

&HE2 

&X11100010 


■ 


223 

&HDF 

&X11011111 


227 

&HE3 

&X11100011 


224 

&HE0 

&X11100000 


228 

&HE4 

&X11100100 
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R3SS    EE 


TTT 


■■■■■*! 

1 1  Hi n 


229 

&HE5 

&X11100101 


230 

&HE6 

&X1 11001 10 


231 

&HE7 

&X1110O111 


TTTIT LL 

-1 

H 

ll 

232 

&HE8 

&X11101000 


233 

&HE9 

&X1 1101001 


234 

&HEA 

&X11101010 


2S 


235 

&HEB 

&X11101011 


236 

&HEC 

&X11101100 


mm 


237 

&HED 

&X1 1101101 


238 

&HEE 

&X11101110 


239 

&HEF 

&X11101111 


240 

&HF0 

&X11110000 


SSeE 


241 

&HF1 

&X1 11 10001 


242 

&HF2 

&X11110010 


HB 


m 


243 

&HF3 

&X11110011 


244 

&HF4 

&X11110100 


■■■■■■■I 


245 

&HF5 

&X1 11 10101 


246 

&HF6 

&X11110110 


247 

&HF7 

&X1 1110111 


248 

&HF8 

4X11111000 
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249 

&HF9 

&X1 11 11001 


250 

&HFA 

4X11111010 


W 

las 


251 

&HFB 

&X11111011 


m 


253 

254 

255 

&HFD 

&HFE 

&HFF 

&X11111101 

&X11111110 

&X11111111 

_Tmmmt  X 


252 

&HFC 

&X11111100 


i... 


J.  J 
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Partie  4  :  References  des  touches     -™q  «•<- 


Valeurs  ASCII  par  defaut  (HEX) 


< 

z 

5 

z 

z 

1 

■t-m 

U-U-U. 

z 

z 

5 

z 

eo<fp 

U.U.U. 

U-U-U. 

z 

3 

z 

z 

< 

1 1 

U.U.U. 

U.U.U. 

888 

< 

z 

Z 

999 

i 

ess 

5SS 

com 

NO 

8K§ 

QO 

as 

<Nrt 

SgS 

UJUJ 

UUO 

o^3 

TON 

0)0) 

BDjO 

ojoiffi 

QC19 

cog 

«< 

ffitJlO) 

fftfir- 

05  COSE 

10  <o 
mm 

B5£ 

£$K 

8SS 

■*2 

S3S 

torn 

UHN 
Vf|P) 

ooo 

UJlJrtiJ 

555 

PSfi 

Z 

z 

z 

•-uir- 

4 

z 

.-OlOl 
UJOO 

D 

LLJ 

~> 
LU 
Q 
LU 

r- 

h- 

LU 


rlflS 

h- 

(0    (Q 

D 

LU 
-) 

LU 

Q 

LLI 

H 

r- 
LU 


0)0) 
OO 

p^LO 

CDLTJ 
OO 

OO 

re  03  CO 
pLOLO 

COCO 

OO 
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Touches    programmable,  valeurs  et  emplacements  par  defaut 


N/A 


N/A 


N/A 


N/A 


N/A 


N/A 


N/A 


N/A 


N/A 


N/A      N/A 


N/A 


N/A  IN/A  RN/A 


135 


136 

136 


137 

IS 


N/A       N/A     N/A      N/A     N/A     N/A      N/A     N/A      N/A      N/A     N/A     N/A      N/A 


N/A         N/A      N/A     N/A     N/A     N/A     N/A     N/A     N/A      N/A     N/A     N/A     N/A 


a   N/A 


111 
132 


133 
133 
133 


129 


134 


N/A 


N/A     N/A   |  N/A     N/A     N/A     N/A     N.A     N/A     N/A     N/A     N/A 


N/A 


N/A 


N/A 


N/A 


N/A 


140 
139 
139 


N/A 


N/A 


N/A 


TOUCHES 

PROGRAM- 

MABLES 

VALEUR  PAR  DEFAUT 

CARACTEHE 

VALEUR  ASCII 

0(138) 

1(129) 

2(130) 

3(131) 

4(132) 

5(133) 

6(134) 

7(135) 

8(136) 

9(137) 

10(138) 

11(139) 

12(140) 

0 
1 
2 
3 
t 
5 
6 
7 
8 
9 

[RETURN) 
RUN  "[RETURN! 

&30 
&31 

&32 
&33 
&34 
&36 
&36 
&37 
&38 
&39 
&2E 
&0D 
&  52  &55  &  4E  &  22  &0D 

Remarque:  La  valeur  par  defaut  dea  touches  program- 
mable* 13  a  431  (141  a  169)  est  egales  a  0.  Das  valeurs 
et  dei  touches  leur  sorrt  affactee*  a  laid*  des  com- 
mandes  KEY  et  KEYOEF  reapectivement. 
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Numeros  des  touches  et  des  positions  des  manettes  de  jeu 


D 

LLI 
LLI 

z 

< 

5 


oo 


o 

LU 

~> 
LU 

Q 

LU 


LU 

z 
< 


\f) 


r_ 

OL 

s 

\- 

CM 

a. 

ffl 

h- 

a 


IS 

e£ 

CM 

P 

i- 

* 
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Partie  5  :  Les  sons 


Notes  et  periodes  sonores 

La  table  suivante  donne  les  periodes  sonores  pour  les  notes  de  la  gamme  complete  de  huit 
octaves. 

La  frequence  produitc  n'est  pas  totalement  exacte  car  die  est  calculee  a  partir  d'un  nom- 

bre  entier.  L'erreur  relative  s'obtient  en  calculant  le  pourcentage  de  la  difference  entre  la 
frequence  theorique  et  la  frequence  reelle  par  rapport  a  la  frequence  reelle. 


NOTE 

FREQUENCE 

PERIODE 

ERREUR  RELATIVE 

C 

16.352 

3822 

-0.007% 

c# 

17.324 

3608 

+0.007% 

D 

18.354 

3405 

-0.007% 

D# 

19.445 

3214 

-0.004% 

E 

20.602 

3034 

+0.009% 

F 

21.827 

2863 

-0.016% 

Octave  -4 

F# 

23.125 

2703 

+0.009% 

G 

24.500 

2551 

-0.002% 

G# 

25.957 

2408 

+0.005% 

A 

27,500 

2273 

+0.012% 

A# 

29.135 

2145 

-0.008% 

B 

30.868 

2025 

+0.011% 

NOTE 

FREQUENCE 

PERIODE 

ERREUR  RELATIVE 

C 

32.703 

1911 

-0.007% 

at 

34.648 

1804 

+0.007% 

D 

36.708 

1703 

+0.022% 

D# 

38.891 

1607 

-0.004% 

E 

41.203 

1517 

+0.009% 

F 

43.654 

1432 

+0.019% 

Octave  -3 

F# 

46.249 

1351 

-0.028% 

G 

48.999 

1276 

+0.037% 

G# 

51.913 

1204 

+0.005% 

A 

55.000 

1136 

-0.032% 

A# 

58.270 

1073 

+0.039% 

B 

61.735 

1012 

-0.038% 

Cbapitre  ?    Page 
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NOTE       FREQUENCE 


c 

65.406 

c# 

69.296 

D 

73.416 

0# 

77.782 

E 

82.407 

F 

87.307 

F# 

92.499 

G 

97.999 

G# 

103.826 

A 

110.000 

A# 

116.541 

B 

123.471 

PERIODE 

ERREUR 

956 

+0.046% 

902 

+0.007% 

851 

-0.037% 

804 

+0.058% 

758 

-0.057% 

716 

+0.019% 

676 

+0.046% 

638 

+0.037% 

602 

+0.005% 

568 

-0.032% 

536 

-0.055% 

506 

-0.038% 

Octave  -2 


NOTE      FREQUENCE  PERIODE      ERREUR  RELATIVE 


c 

130. 

813 

c# 

138 

591 

D 

146 

832 

D# 

155 

564 

E 

164 

814 

F 

174 

614 

n 

184 

997 

G 

195 

998 

G# 

207 

652 

A 

220 

.000 

A# 

233 

.082 

B 

246 

.942 

478 
451 
426 
402 
379 
358 
338 
319 
301 
284 
268 
253 


+0.046% 
+0.007% 

.081% 
.058% 
.057% 
.019% 
,046% 
.037% 
+0.005% 
-0.032% 
-0.055% 
-0.038% 


+  0. 
+  0, 
-0. 
+  0, 
+  0, 
+  0, 


Octave  -1 


NOTE      FREQUENCE  PERIODE      ERREUR  RELATIVE 


c 

261.626 

c# 

277.183 

D 

293.665 

D# 

311.127 

E 

329.628 

F 

349.228 

F# 

369.994 

G 

391.995 

Gti 

415.305 

A 

440.000 

A# 

466.164 

B 

493.883 

239 
225 
213 
201 

190 
179 
169 
159 
150 
142 
134 
127 


+0.046% 
-0.215% 
+0.081% 
+0.058% 
+0.206% 
+0.019% 
+0.046% 
-0.277% 
-0.328% 
-0.032% 
-0.055% 
+0.356% 


Do  medium 


Octave  0 


A  international 
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NOTE      FREQUENCE 

PERIODE 

ERREUR  RELATIVE 

C 

523.251 

119 

-0.374% 

CH 

554.365 

113 

+0.229% 

D 

587.330 

106 

-0.390% 

0# 

622.254 

100 

-0.441% 

E 

659.255 

95 

+0. 206% 

F 

698.457 

89 

-0.5  43%                Octave  1 

F# 

739.989 

84 

-0.548% 

G 

783.991 

80 

+0.350% 

G# 

830.609 

75 

-0.328% 

A 

880.000 

71 

-0.032% 

A# 

932.328 

67 

-0.055% 

B 

987.767 

63 

-0.435% 

NOTE 

FREQUENCE 

PERIODE 

ERREUR  RELATIVE 

C 

1046.502 

60 

+0.462% 

U 

1108.731 

56 

-0.662% 

D 

1174.659 

53 

-0.390% 

D# 

1244.508 

50 

-0.441% 

E 

1318.510 

47 

-0.855% 

F 

1396.913 

45 

+0.574%              „  . 

F* 

1479.978 

42 

-0.548%               °*""» 

G 

1567.982 

40 

+0.350% 

G# 

1661.219 

38 

+0.992% 

A 

1760.000 

36 

+1.357% 

A# 

1864.655 

34 

+1.417% 

B 

1975.533 

32 

+1.134% 

NOTE 

FREQUENCE 

PERIODE 

ERREUR  RELATIVE 

C 

2093.004 

30 

+0.462% 

zn 

2217.461 

28 

-0.662% 

D 

2349.318 

27 

+1.469% 

D# 

2489.016 

25 

-0.441% 

E 

2637.021 

24 

+1.246% 

F 

2793.826 

22 

-1.685%               -. 

F0 

2959.955 

21 

-0.548%             Octave  3 

G 

3135.963 

20 

+0.350% 

G# 

3322.438 

19 

+0.992% 

A 

3520.000 

18 

+1.357% 

A# 

3729.310 

17 

+1.417% 

B 

3951.066 

16 

+1.134% 

Ces  valeurs  sont  toutes  calculees  a  partir  du  LA  International  comme  suit : 


FREQUENCE  = 
PERIODE  = 


440l(2t(OCTAVE+<(N-10)/12))) 
ROUND (125000/FREQUENCE) 


ou  N  est  egal  a  1  pour  do,  2  pour  do  diese,  3  pour  re,  etc. 
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Partie  6  :  Messages  d'erreur  du  BASIC 

1  Unexpected  NEXT    (NEXT  inattendu) 

Unc  commande  N  EXT  a  ete  rencontree  sans  que  la  commande  FOR  n'ait  lance  de  boucle 

ou  bien  la  variable  suivant  NEXT  ne  correspond  pas  a  celle  de  la  boucle  FOK- 

2  Syntax  Error    (trreur  de  syntaxi) 

Le  BASIC  ne  comprend  pas  la  ligne  a  cause  d'une  construction  non  pennise  (tres  souvent 

une  faute  de  frappe). 

3  Unexpected  RETURN   (RETURN  inattendu) 

Une  commande  RETURN  survient  sans  qu'il  y  ait  de  sous-programme  en  cours. 
A   DATA  exhausted  <il    n'y   a   pius   de   donnees    (DATA)) 

Une  commande  READ  a  essaye  de  lire  une  ligne  de  DATA  epuisee. 

5  Improper   argument      (argument   incorrect) 

Erreur  d'ordre  general.  L'argument  d'une  fonction  ou  le  parametre  d'une  commande 

n'est  pas  acceptable. 

6  Overflow  (depassenent  arithmeti que) 

Se  oroduit  lorsqu'une  operation  arithmetique  depasse  les  limites Le  chiffre  en  virgule 
SSe  est  detenu  troP  grand  (supeneur  a  1.7ET38)  ou  a  fait  1'objet  d'une  tentative  de 
conversion  en  un  nombre  entier  trop  grand. 

7  Memory  full  (memoirs  saturee) 

Le  programme  ou  ses  variables  sont  trop  grands  pour  la  mfenoire  ou  la  structure  des 
briefest  trop  compliquee  (trop  de  GOSUB,  WHILE  et  FOR  nnbnques). 

A  chaque  fichier  ouvert  est  affecte  un  tampon  de  memoire,  ce  qui  peut  etre  une  cause  de 
limitation  pour  la  commande  MEMORY. 
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8  Lint  does  not  txiit    (lign*  in§xi«t*nti)   ■''  '>"'"?■" 

Le  numero  de  ligne  reference  n'existe  pas  en  memoire. 

?  Subscript  out  of  rang*   (indice  hors  Unite) 

Un  des  indices  de  votre  tableau  est  trop  grand  ou  trop  petit. 

10  Array  already  dimensioned  (tableau  deja  dimensionne) 

Un  des  tableaux  d'une  instruction  DIM  a  deja  ete  defini. 

11  Division  by  zero       (division  par  zero) 
L'ordinateur  n'aime  pas  diviser  par  zero,  que  ce  soit  reel,  entier,  etc... 

12  Invalid  direct  command      (comiandt  directe  non   valabla) 
La  commande  n'est  pas  acceptable  en  mode  direct. 

13  Type  mismatch      (types  de  variable  nt  correspondant  pas) 

On  a  donne  une  valeur  numerique  pour  une  chaine  alphanumerique  ou  vice-versa  ou  un 
nombre  non  valable  a  ete  decouvert  par  une  commande  READ  ou  INPUT. 

14  String  space  full      (espace  reserve  aux  chaines  sature) 
II  y  a  tellement  de  chaines  qu'il  n'y  a  plus  de  place,  meme  apres  une  remise  en  ordre. 

15  String  too  long      (chaine  trop   longue) 

Une  chaine  a  plus  de  255  caracteres,  ce  qui  peut  arriver  lors  d'une  concatenation  dc 

chaines. 

16  String  expression  too  complex  (chaine  trop  compliquee) 

Des  expressions  de  chaines  peuvent  produire  des  valeurs  intermediaires  qui,  si  elles  sont 
trop  nombreuses,  conduisent  le  BASIC  a  donner  ce  message. 
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17  Cannot  CONTinue  (on  ne  peut  pas  CONTinuer) 

Le  programme  ne  peut  pas  poursuivre  son  execution  avec  CONT,  qui  sert  apres  une  com- 
mande  STOP,  [ESC] [ESC]  ou  une  erreur.  Notez  que  si  le  programme  a  ete  modifie 
entre-temps,  il  est  impossible  de  le  relancer  par  cette  commande. 

18  Unknown  user   function    (fonction  inconnue  au  bataillon) 
On  a  oublie  de  definir  la  fonction  FN  avec  la  commande  DEF  FN  auparavant. 

19  RESUME   missing      (commande  RESUME   absente) 

On  a  trouve  la  fin  de  programme  alors  que  celui-ci  procedait  a  un  traitement  d'erreur  (a 
la  suite  d'une  declaration  ON  ERROR  GOTO). 

20  Unexpected  RESUME  (RESUME  inattendu) 

On  tombe  sur  une  commande  RESUME  sans  etre  dans  un  sous-programme  de  type  ON 
ERROR  GOTO. 

21  Direct  command  found   (commande  diracte  tombant  du  ciel!) 
En  chargeant  un  programme,  une  ligne  sans  numero  s'est  presentee. 

22  Operand  missing     (operands  absent) 
Le  BASIC  vient  de  tomber  sur  une  expression  incomplete. 

23  Line  too  long   (ligne  trop  iongue) 
Le  BASIC  n'accepte  pas  les  lignes  de  plus  de  255  caracteres. 

24  EOF  set  (rencontre  d'une  fin  de  fichier) 

EOF  =  End  Of  File  =  fin  de  fichier ;  le  programme  a  effectue  une  tentative  de  lecture 

apres  une  fin  de  fichier. 

25  File  type  error  (erreur  dans  le  type  de  fichier) 

Le  fichier  n'est  pas  du  type  requis.  OPENIN  peut  seulement  ouvrir  des  fichiers  de  texte 
ASCII.  LOAD,  RUN,  etc.,  ne  fonctionnent  qu'avec  des  fichiers  produits  par  SAVE. 
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26  NEXT  missing   (NEXT  manquant) 

On  tie  peut  pas  trouver  le  NEXT  qui  corresponde  a  une  commande  FOR. 

27  File  already  open    (fichier  deja  ouvert) 

line  commande  OPENIN  ou  OPENOUT  est  executee  avant  que  le  fichier  deja  ouvert 
n'ait  ete  ferme, 

28  Unknown  command      (commande   inconnue) 

Le  BASIC  ne  trouve  pas  de  references  a  cette  commande  externe. 

29  WEND   missing      (WEND  manquant) 

La  boucle  commencee  par  WHILE  n'est  pas  terminee  par  WEND.  ■■  ■:".> 

30  Unexpected    WEND      (wend    inattendu) 

Un  WEN  D  est  decouvert  en  dehors  d'une  boucle  WHILE,  ou  un  WEND  ne  correspond 
pas  au  WHILE  de  la  boucle.  " 

31  File  not  open      (fichier  non  ouvert) 
(Voir  paragraphs  ci-dessous,  «  Erreurs  de  disquette  ».) 

32  Broken   in      (interrofflpu)  .■■'? 
(Voir  paragraphe  ci-dessous,  «  Erreurs  de  disquette  ».) 

Erreurs  sur  disquette  en  AMSDOS 

Plusieurs  erreurs  peuvent  se  produire  lors  du  traitement  des  operations  d'archivage.  Bien 
que  le  BASIC  les  regroupe  sous  le  numero  d'ERReur  32,  vous  pouvez  obtenir  de  plus 
amples  informations  en  appelant  la  fonction  DERR.  Voici  la  signification  des  valeurs 
qu'elle  renvoie  : 


i 
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Erreur  AMSDOS  Valeur  DERR  Source  de  l'erreur 

0  0ou22  Activation  de  [ESC]. 

14  1 42  ( 1 28  +  14)  Etat  du  canal  non  valable. 

15  1 43  ( 1 28  + 1 5)  Fin  de  fichier  ma  terielle. 

16  144(128+16)  Mauvaise   commande,    generalement 

nom  de  fichier  incorrect. 

17  1 45  ( 1 28  +  1 7)  Fichier  deja  existant. 
1  g  1 46  (1 28  + 18)  Fichier  non  existant. 

19  147(128+19)  Catalogue  sature. 

20  1 48  ( 1 28  +  20)  Disquette  pleine. 

2i  149(128  +  21)  Changement    de    la    disquette    avec 

fichiers  ouverts. 

22  150(128+22)  Fichier  en  lecture  seulemen  t . 

26  1 54  (1 28  +  26)  Fin  de  fichier  logicielle. 


Si  AMSDOS  a  deja  rapporte  une  erreur,  le  bit  7  a  pris  la  valeur  1,  decalant  celle  de  DE  RR 
de  128. 

Les  autres  valeurs  rapportees  par  DERR  proviennent  du  controleur  de  la  disquette,  le  bit 
6  etant  toujours  sur  1 .  Le  bit  7  indique  si  AMSDOS  a  rapporte  l'erreur  ou  non  (voir  ci- 
dessus).  Voici  la  signification  de  chacun  des  bits : 


Bit  Signification 

0  Adresse  manquante. 

1  Ecriture  impossible.  Disquette  protegee. 

2  Pas  de  donnee.  Secteur  introuvable. 

3  Unite  non  prete.  Pas  de  disquette  dans  l'unite. 

4  Surcharge. 

5  Erreur  de  donnee.  Erreur  CRC  (cyclic  redundancy  check). 

6  Toujours  a  1  pour  indiquer  une  erreur  venant  du  controleur  de 
disquette. 

7  Sur  1  si  AMSDOS  a  deja  rapporte  l'erreur. 
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ERR  peut  envoyer  31  si  vous avez  tente  I'acces  a  une  disquette  sans aucun  fichier  ouvert. 

Une  procedure  classique  d'utilisation  deERRetDERR  consiste  a  inclure  ^instruction 
ON  ERROR  GOTO  arm  d'appeler  un  sous-programme  determinant  la  valeur  (31  ou 
32)  de  ERR  puis,  en  cas  d'erreur  32,  utilisant  1'indicateur  DERR  pour  afficher  ia  nature 
exacte  de  l'errcur.  Par  exemple  : 

10  ON  ERROR  GOTO  1000 

20  OPENOUT  "monfich.asc" 

30  WRITE  S9,"donnee-test" 

40  CLOSEQUT 

50  END 

1000  aissdoserr=fDERR  AND  fc7F):REM  bit  7  force  a  0 

1010  IF  ERR<31  THEN  END 

1020  IF  £RR=31  THEN  PRINT  "etes-vous  sur  d'avoir  tape  la  liq 

ne20?":END 

1030   IF   amsdoserr=20   THEN  PRINT    "II    n'y  a  plus   de  place   sur 

la  disquette    ":END 

1048    IF   amsdoserr=«i000010   THEN   PRINT"placez   une  disquette 

ncm   protegee   dans      l'uriite,    puis   appuyej    sur   n'importe  q 

ulen,yr,er1;l0ruche     "!WHILE    INKEY»="U: WEND: RESUME 

1050    END 

Partie  7  :  Mots  cles  du  BASIC 
(egalement  appeles  mots  reserves) 

Voici  une  liste  des  mots  cles  du  BASIC  AMSTRAD  6128.  lis  sont  reserves  et  ne  peuvent 
etre  utilises  comme  variables. 

ABS,  AFTER,  AND,  ASC,  ATN,  AUTO 
BINS,  BORDER 

^kbrt"T',Ft!AIN'  CHR$'  C1NT'  CLEAR>  CLG>  CLOSEIN, 
CLOSEOUT,  CLS,  CONT,  COPYCHR*,  COS,  CREAL,  CURSOR 

£8:  ""t.S%^'SWEFREflL' DEFS,R' DE6' DELETE- 

i&,E,^?EixEND'  ENT'  ENV' E0F'  ERflSE'  ERL'  ERR| 

FILL,  FIX,  FN,  FOR,  FRAME,  FRE 
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G0SU6,  GOTO,  GRAPHICS 

HEX*,  H1MEM 

IF,  INK,  INKEY,  INKEY*,  INP,  INPUT,  INSTR,  INT 

JOY 

KEY 

LEFT*,  LEN,  LET,  LINE,  LIST,  LOAD,  LOCATE,  LOG,  L0G1B 
LOWER* 

MASK,  MAX,  MEMORY,  MERGE,  MID*,  MIN,  MOD,  MODE,  MOVE, 
MOVER 

NEXT,  NEW,  NOT 

ON,  ON  BREAK,  ON  ERROR  GOTO  0,  ON  SQ,  OPENIN,  OPENOUT, 

OR,  ORIGIN,  OUT 

PAPER.  PEEK,  PEN,  PI,  PLOT,  PLOTR,  POKE,  POS,  PRINT 

RAD,  RANDOMIZE,  READ,  RELEASE,  REM,  REMAIN,  RENUM, 
RESTORE,  RESUME,  RETURN,  RIGHT*,  RND,  ROUND,  RUN 

SAVE,  SGN,  SIN,  SOUND,  SPACE*,  SPC,  SPEED,  SQ,  SQR, 
STEP,  STOP,  STR*,  STRING*.  SWAP,  SYMBOL 

TAB,  TAG,  TAGOFF,  TAN,  TEST,  TESTR,  THEN,  TIME,  TO, 
TROFF,  TRON 

UNT,  UPPER*,  USING 

VAL,  VPOS 

WAIT,  WEND,  WHILE,  WIDTH,  WINDOW,  WRITE 

XOR,  XPOS 

YPOS 

ZONE 
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Partie  8 :  Grilles 


Grille  pour  textes  et  fenetres  d'ecran  -  MODE  0  (20  colonnes) 
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Grille  pour  textes  et  fenetres  d'ecran  -  MODE  1  (40  colonnes) 
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Grille  pour  textes  et  fenStres  d'ecran  -  MODE  2  {80  colones) 
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Enveloppe  des  sons/Grille  de  musiquc 
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Partie  9 :  Connexions 


Entrees/Sorties  du  6128 


1 1 1 1 1  in  i  ittiimti  ri  i  u  i  rm  iTiTin 


ffl 


J©L 


t    t    t 


PRISE  POUR  LECTEUR 
DE  CASSETTE 


PRISE  DE  L'UNITE 
OE  DISQUETTE  2 


PRISE  O'IMPRIMANTF 


PRISE  MONITEUR 


PRISE  12  V  CC  PRISE  O'EXTENSION 


PRISE  STEREO 


PRISE  POUR  MANETTE  OE  JEU 


Prise  de  raanette  de  jeu 


0 


VUE  ARRIERE 

1 

2            3            4 

• 

•            •            • 

■ 

I 

• 

•            « 

• 

j 

I 

6 

7            8 

9 

/ 

0 


BROCHE     1 

HAUT 

BROCHE     6 

FEU  2  TIR 

BROCHE     2 

BAS 

BROCHE     7 

FEU  1  TIH 

BROCHE     3 

GAUCHE 

BROCHE     8 

COMMUN 

BROCHE     4 

DROITS 

BROCHE     9 

COM2 

BROCHE     5 

RESERVE 
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Prise  moniteur 


VUEARfllERE 


5        1 

6 

432 


BROCHE 1      ROUGE 
BROCHE   2     VERT 
BROCHE   3     BLEU 


BROCHE  4     SYNC 
BROCHE  5     MASSE 
BROCHE  6     LUM 


Prise  stereo 


DROIT 


IX) 


MASSE 


A 


V~ 


GAUCHE 


-GAUCHE 

-  DROIT 

-  MASSE 


BROCHE  1  CANAL  GAUCHE 
BROCHE  2  CANAL  DROIT 
BROCHE  3  MASSE 


Prise  de  Iecteur  de  cassette 


VUE  ARRIEHE 


BROCHE  1  TELECOMMANCE 
BROCHE  2   MASSE 
BROCHE  3  TELECOMMANDE 


BROCHE   4  DONNEESENTRANTES 
BROCHE  5   DONNEESSORTANTES 
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Prise  d'extension 


VUEARRIERE 


49      47      45     43      41      39      37      35      33      31      29      27      25      S3      31       19      17      IB      13      11       9        7       5       3  1 


50      48      4«      44      42      40      38      36      34      32      30  .   28      26      24      22      20       19       16      14      12      10 


PIN      1 

SOUND 

PIN    18 

AO 

PIN    35 

INT 

PIN     2 

GND 

PIN    19 

D7 

PIN    36 

NMI 

PIN      3 

A15 

PIN    20 

D6 

PIN    37 

BUSR2 

PIN      4 

A14 

PIN     21 

05 

PIN    38 

BUSAK 

PIN      5 

A13 

PIN    22 

04 

PIN    39 

READY 

PIN      6 

A12 

PIN    23 

03 

PIN    40 

BUS    RESET 

PIN      7 

A11 

PIN    24 

D2 

PIN    41 

RESET 

PIN      8 

A10 

PIN    25 

01 

PIN    42 

ROMEN 

PIN      9 

A9 

PIN    26 

DO 

PIN    43 

ROMDIS 

PIN    10 

A8 

PIN    27 

+  5v 

PIN    44 

RAMRD 

PIN     11 

A7 

PIN    28 

MREQ 

PIN    45 

RAMDIS 

PIN    12 

A6 

PIN    29 

Ml 

PIN    46 

CURSOR 

PIN     13 

A5 

PIN    30 

RFSH 

PIN    47 

L.   PEN 

PIN    14 

A4 

PIN    31 

IORQ 

PIN    48 

EXP 

PIN    15 

A3 

PIN    32 

RD 

PIN    49 

GND 

PIN     16 

A2 

PIN    33 

WR 

PIN    50 

0 

PIN     17 

A1 

PIN    34 

HALT 

Prise  de  I'unite  de  disquette  2 


VUEARRIERE 
2       4        6       8      10      12      14      16      18      20     22     24     26     28     30     32     34 


3 


1        3        5        7       9       11      13      15      17      19     21      23     25     27      29     31      33 


PIN1 

PIN  18 

GND 

READY 

PIN  2 

GND 

PIN  19 

MOTOR  ON 

PIN  3 

SIDE  1  SELECT 

PIN  20 

GND 

PIN  4 

GND 

PIN  21 

N/C 

PINS 

READ  DATA 

PIN  22 

GND 

P1N6 

GND 

PIN  23 

DRIVE  SELECT  1 

PIN  7 

WRITE  PROTECT 

PIN  24 

GND 

PINS 

GND 

PIN  25 

N/C 

PINS 

TRACK  0 

PIN  26 

GND 

PIN  10 

GND 

PIN  27 

INDEX 

PIN  11 

WRrTEGATE 

PIN  23 

GND 

PIN  12 

GND 

PIN29 

N/C 

PIN13 

WRITE  DATA 

PIN  30 

GND 

PIN  14 

GND 

PIN  31 

N/C 

PIN  15 

STEP 

PIN  32 

GND 

PIN  16 

GND 

PIN  33 

N/C 

PIN  17 

DIRECTION  SELECT 

PIN  34 

GND 
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Porte  pour  imprimante 


VUEARRIERE 

17      16       15      14       13       12      11       10       9        6 


7        6       5        4       3        2        1 


35      34       33      32       31       30     29       2B      27       26      25      24      23       22      21       20       19 
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PIN    26 
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PIN   23 

GND 

PIN 
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BUSY 
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14 

GND 
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16 

GND 

Autres  broches :  I* 

Partie  10 :  Imprimante 
Interfasage 

Le  6128  peut  etre  connecte  a  une  imprimante  standard  compatible  Centronics. 

Le  cable  de  rimprimante  est  une  simple  connexion  entre  la  prise  PRINTER  situee  a  l'ar- 
riere  de  l'ordinateur  et  le  connecteur  de  rimprimante  parallele.  Le  circuit  impnme  de  I  or- 
dinateur  presente  deux  contacts  de  moins  que  le  connecteur  de  rimprimante.  Ceci  permet 
l'utilisation  d'un  connecteur  standard  pour  circuit  imprime. 

La  partie  9  de  ce  chapitre  illustre  en  detail  la  configuration  des  broches. 

Le  cable  doit  permettre  la  connexion  de  la  broche  1  de  l'ordinateur  a  la  broche  1  de  rim- 
primante i  de  la  broche  19  de  l'ordinateur  a  la  broche  19  de  rimprimante,  etc.  Toutefois, 
les  broches  18  et  36  de  rimprimante  de  doivent  pas  ctre  connectees  a  l'ordinateur. 
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Bicn  que  ia  rangee  superieure  de  la  prise  PRINTER  comporte  17  pattes,  le  numero  de  la 
premiere  patte  de  la  rangee  mferieure  est  19  (et  non  pas  18).  De  cetle  maniere,  chaque 
broche  de  l'imprimante  se  trouve  reliee  a  la  piste  du  connecteur  plat  de  I'ordinateur  por- 
tant  exactement  le  meme  numero  qu'elle. 

La  synchronisation  de  I'ordinateur  a  l'imprimante  s'effectue  par  Pintermediaire  du  signal 
BUSY  (broche  1 1).  Si  1'imprimante  n'est  pas  en  fonction,  I'ordinateur  reste  en  attente. 

On  obtient  la  sortie  sur  l'imprimante  en  envoyant  les  donnees  sur  le  canal  jj  8. 

Le  port  d'impression  du  6128  est  concu  pour  recevoir  un  modele  d'imprimante  matri- 
cielle  bon  marche.  Nanti  d'une  interface  parailele  standard,  il  vous  sera  toutefois  possible 
de  doter  votre  ordinateur  d'une  imprimante  a  marguerite,  d'une  table  tracante  ou  d'une 
imprimante  polychrome  a  jet  d'encre. 

L'imprimante  AMSTRAD  DMPI  dispose  d'un  programme  specialise  facilitant  I'impres- 
sion  graphique  comme  la  recopie  d'ecran. 


Configuration  de  l'imprimante 

Un  dispositif  permet  ('impression  des  caracteres  speciaux  affichables  a  I'ecran  et  acceptes 
par  l'imprimante,  en  depit  de  la  difference  du  code  utilise  dans  Pun  et  1'autre  cas.  La  plu- 
part  dc  ces  caracteres  ne  peuvent  etre  obtenus  que  dans  Tun  des  modes  d'impression  inter- 
national de  Ia  DMPI. 

Ainsi : 

PRINT  rHHii&AU; 

...fait  apparaitre  a  I'ecran  ",  tandis  qu'avec : 

PRINT    #8.  CWR«  !  Si  fid! 

...on  obtient  "  sur  Pimprimante  (alors  que  sur  la  DMPI,  I'accent  circonflexe  est  code 
&5E).  En  d'autres  termes,  le  programme  d'impression  identifie  &AO  comme  un  code 
faisant  partie  de  sa  table  dc  conversion  et  lui  substitue  &5E.  afin  que  le  caracterc  imprime 
corrcsponde  bien  a  celui  qu'affiche  I'ecran.  Quel  que  soil  1c  mode  linguistique  choisi,  le 
code  &5E  correspond  toujours  a  I'accent  circonflexe  de  la  DPMI,  ce  qui  n'est  pas  le  cas 
pour  tous  les  caracteres  contenus  dans  la  table  de  conversion.  Voici  les  autres  caracteres 
que  contient  la  table  de  conversion  : 
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CHRS 

Caractere  a 
1'ecran 

Trariscodage 
imprimante 

GB 

U.SA. 

France 

Allemagne 

Espagne 

&A0 

A 

&5E 

A 

A 

A 

A 

A 

&A2 

.. 

&7B 

1 

t 

I 

t 

*  * 

&A3 

£ 

&23 

£ 

n 

u 

§ 

pt 

&A6 

§ 

&40 

T 

X 

1 

I 

&AE 

I 

&5D 

■!■ 

1 

1 

1 

&AF 

' 

&5B 

|      ' 

t 

t 

. 

Pour  le  caractere  imprime,  se  reporter  a  la  page  18  du  manuel  destruction  de  la  DMP1 

La  listc  ci-dessus  est  extraite  de  la  table  des  conversions  par  defaut.  Pour  les  redefinir, 
consulter  le  manuel  de  microprogrammation  (SOFT  946). 


Partie  11 :  Les  manettes  de  jeu 


Lc  svstcme  Sexploitation  du  6128  prevoit  l'ulilisation  d'une  ou  de  deux  manettes  de 
jeu  Au  meme  titre  que  les  touches  du  clavier,  ccs  manettes  pcuvent  etre  mterrogees  au 
moyen  des  instructions  IN  KEY  et  INKEY$.  Le  bouton  de  commande  principal  de  votre 
manette  correspond  lc  plus  souvent  a  «  Fire  2  ».  11  est  possible  d 'inter roger  directement 
la  premiere  ct  la  sccondc  manette  a  Taide  des  fonctions  JOY(O)  ct  JOY(1 )  La  fonction 
JOY  renvoie  un  nombre  dont  la  signification  napparait  qu'en  binairc.  indiquant  !  etat 
des  interrupteurs  des  manettes  dejeu  lors  de  la  derniere  interrogation  du  clavier. 

Le  tableau  ci-dessous  donne  les  valeurs  transmises  par  les  deux  manettes.  Dans  la  partie 
gauche  figurent  les  valeurs  obtenues  par  la  fonction  JOY  et,  dans  la  partie  droite,  celles 
t  utiliser  dans  des  expressions  prenant  les  codes  du  clavier  comme  parametres  (fonctions 
INKEYet  KEYDEF). 


MANCKUVRE 

I'onction  JOY 

VALEURS  «  CLAVIER  » 

Haut 
Bas 

Gauche 
Droite 
Tir  2 
Tir  I 

BIT 

VAl.EUR 
RENVOYEE 

PREMIERE 
MANETTE 

SECONDE                  TOUCHE 
MANETTE                CORRESP. 

0 
1 

2 
3 
4 
5 

I 

2 

4 

8 

16 

32 

72 
73 
74 
75 
76 
77 

48  6 

49  5 

50  R 

51  T 

52  G 

53  F 

Pour  informatio 

i... 
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Vous  constate?  que  Fordinateur  assimile  les  valeurs  renvoyees  par  la  seconde  manette  a 

celles  provenant  des  touches  correspondantes  du  clavier  (derniere  colonne  du  tableau).  II 
est  done  possible  d'utiliser  le  clavier  comme  deuxieme  manette  de  jeu. 


Partie  12  :  Les  formats  de  disquettes 

Le  BIOS  prend  en  charge  trois  formats  de  disquettes  differents  :  les  formats  SYSTEM, 
DATA  ONLY  et  IBM.  Lorsqu'un  systeme  fonctionnant  sous  AMSDOS  accede  a  une 
disquette  ne  comportant  aucun  fichier  ouvert.  il  en  detccte  automatiquement  le  format. 
Chaque  format  est  dote  a  cette  fin  d'une  numerotation  de  secteurs  specifique. 

Bien  que  les  disquettes  «  3  pouces » soient  a  double  face,  seule  la  face  superieure  est  acces- 
sible par  1'unite.  Les  deux  faces  peuvent  etre  de  format  different. 

Caracteristiques  communes  a  tous  les  formats 

Simple  face  (les  deux  faces  d'une  disquette  «  3  pouces »  etantenfcgretrtefsepartoientY: 
Taille  d'un  secteur  physique  :  512  octets. 
40  pistes  n  urn  ero  tees  de  0  a  39. 
Taille  du  bloc  CP/M  :  1024  octets. 
Repertoire :  64  entrees. 

Le  format  SYSTEM 

9  secteurs  par  piste,  numerates  de  &41  a  &49. 
2  pistes  reservees. 

Le  chargement  du  CP.  M  n'etant  possible  qua  parti  r  d'une  disquette  de  format  systeme, 
cc  dernier  est  done  !c  plus  commun.  Pour  un  amorcage  a  chaud,  le  CP.  M  2.2  requicrt 
cgalement  rinsertion  d'une  disquette  dc  format  systeme.  Voici  I'affectalion  des  pistes 
reservees  : 


CP'M  2.2 


Piste  0  secteur  &41  :  amorcage 

Pi  ste  0  secteur  &42  :  con  figura  t  i  on 

Piste  0  secteurs  &43  a  &47  :  inutilises 

Piste  0  secteurs  &48  a  &49  »      rno      DT^rt„ 

Piste  1  secteurs  &4I  a  &49  t       CCP  et  0l)Oi' 


CP  M  Plus 


:amorcage 


inulilise 


II  existe  une  version  du  format  systeme  dans  laquellc  les  pistes  reservees  ne  contiennent 
iucun  logiciel  :  le  format  VENDOR,  destine  a  la  distribution  des  logiciels  d'application. 
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Le  format  DATA  ONLY  ,  yfa    ,: 

9  secteurs  par  piste,  numerotes  de  &C1  a  &C9. 
Aucune  piste  reservee. 

L'utilisation  de  ce  format  sous  CP/M  2.2  est  deconseillee  dans  la  mesure  ou  il  iTautorise 
pas  ramorcage  a  chaud.  Limite  a  AMSDOS  et  au  CP/M  Plus,  il  permet  un  leger  gam  de 
place  sur  la  disquette. 

Le  format  IBM  (reserve  au  CP/M  2.2) 

8  secteurs  par  piste,  numerotes  de  &1  a  &8. 
1  piste  reservee. 

En  conformite  logicielle  avec  1c  format  «  simple  face  »  utilise  par  CP/M  sur  1'IBM  PC.  Le 
6128  effectue  la  lecture  et  recriture  des  disquettes  au  format  IBM.  mats  ne  pcrmct  pas  de 
les  crecr  ou  de  les  copier. 


Partie  13 :  Extensions  residentes  du  systeme 
(RSX) 

Nous  avons  evoque  les  commandes  externes  au  chapitre  5  (a  propos  de  1' AMSDOS).  Une 
commande  externe  scrt  a  clargir  le  repertoire  du  BASIC  en  lui  ajoutant  de  "ouvellcs com- 
mandes indiquees  par  le  pref.xc  ..  Les  instructions  machine  de^"ouve"es.?omt™aBn£ 
AMSDOS  resident  en  memoire  ROM  (memoire  mortc)  ct  la  procedure  dadjonction  des 
commandes  est  assuree  automatiqucment  des  que  1c  6128  demarre  en  BASIC. 

Best  eaalement  possible d'ajouter  d'autres commandes (aprcs  lancement  du  BASIC) en 
chareeant  les  instructions  machine  en  memoire  RAM  (memoire  vivc).  Ces  nouvelles  com- 
mandes sont  appelecs  RSX  (extensions  residentes)  et  fonctionnent  cxactcment  comme  les 
extensions  stockces  dans  la  ROM.  Les  extensions  residentes  doivent  ctre  chargecs  a  part.r 
de  la  disquette  (ou  de  la  cassette)  a  chaque  initialisation  ou  rcm.tialisation  du  6128  en 
BASIC.  Elles  servent  habiluellcmenl  a  commander  des  peripheries  mtelhgcnts  tels  que 
des  crayons  optiques  ou  des  synthetiscurs  de  parole. 

Le  chapitre  8  decrit  Tulilisation  des  extensions  residentes  RSX  pour  acceder  au  second 
bloc  des  64  Ko  de  memoire. 
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Partie  14  :  La  memoire 


Le  6128  possede  une  memoire  RAM  de  128  Ko  et  une  ROM  de  48  Ko,  accessibles  au 
BASIC  1.1  (voir  figure  ci-dessous).  Les  premiers  64  Ko  de  RAM  sont  divises  en  qualre 
blocs  de  1 6  Ko  chacun,  numerates  de  0  a  3.  L'ecran  exploite  le  bloc  3.  La  partie  superieure 

du  bloc  2  contient  les  variables  systeme. 


*Oe3 


BtOc2 


fcoc,] 


«OC(, 


PnEWEREPARTS 
MS  M  Ko  M  HAM 


*«*» 


DEUX1EUE  Partie 
OES  U  Ko  OE  RAM 


"OH, 


SAOVC 


Zoos  de  dorwdd.  dm  mieracMiwumi 
2oo#  o>  brdnchdmdma 

Zo<»«  de  donod**  bask; 

Zona  d«  ddno*M  dds  ROMS  4'idvWn 

r 


V      ZONE  PROQRAUMES 
BASIC 


^^ 


'Mimes 


NOTE  I :  DEPEND  DES  ROMS  O'SXIENSK*  (.  AOFC.  EN  i.  ABSENCE  DE  ROM  OEXTENSiqN) 

Topographie  de  la  memoire  pour  le  BASIC  1 . 1 

Au  depart,  les  caracteres  definis  par  1'utilisateur  se  trouvent  immediatement  au-dessus  de 
la  limite  HIMEM,  mais  celle-ci  peut  etre  modifiee  par  une  commande  MEMORY  et  elle 
est  automatiquement  abaissee  de  4  Ko  lors  de  I'ouverture  de  fichiers  AMSDOS  pour 
creation  d'une  memoire  tampon.  Le  nombre  de  caracteres  definis  par  1'utilisateur  ne  peut 
etre  modific  que  si  aucun  changement  du  jeu  de  caracteres  n'est  intervene  depuis  sa  deter- 
mination precedente  (a  moins  qu'une  commande  SYM  BOL  AFTER  256  n'ait  fixe  «  pas 
de  caracteres  definis  par  1'utilisateur  »).  Lors  du  lancement  du  BASIC,  les  caracteres  defi- 
nis par  1'utilisateur  sont  fixes  comme  si  une  commande  SYM  BOL  AFTER  240  avait  ete 
envoyee. 

II  est  done  prudent  de  liberer  la  zone  des  caracteres  definis  par  1'utilisateur  avant  de  modi- 
fier HIMEM  definitivement,  puis  de  restaurer  cette  zone  dans  sa  nouvelle  position.  Les 
programmes  suivants  pourront  ainsi  modifier  1'affectation  faite  par  la  commande  SYM- 
BOL AFTER. 
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L'exemple  ci-dessous  illustre  cette  fa^on  de  proceder  Iorsque  HIM  EM  est  abaissee  par  le 

chargement  d'extensions  residentes  RSX. 


2oot 
Zorm 
Zf*1S 
Zora 
Zon* 


0«  doiniaa  mict0pOfl'«n>'i>9» 

dw  bHr*:t>*m*nts 

de  *Kin6fiH  BASIC 

»a  dOflH*«  ROM  di*qu**» 

aedonn*na  o«»  ROMS  d'orttr»ofl 


Topographie  de  la  memoire  avec  RSX  i  FemplacemenT  recommande 


Entrees/Sorties  supplementaires 

Les  adresses  des  ports  d'Entree/Sortie  sont,  pour  la  piupart,  reservees  par  1'ordinateur. 
Les  adresses  inferieurcs  a  &7FFF,  notamment,  sont  absolument  prohibees. 


Pour  information. 


Chapitre7    Page  47 


Les  lignes  d'adresses  AO  a  A  7  seront  affectees  a  la  designation  du  type  de  peripherique  et 
les  lignes  A8  et  A9  a  la  selection  de  l'un  des  registres  du  peripherique  sollicite.  Parmi  les 
lignes  restantes  seul  A 10  doit  etre  decodee  (etat  bas)  alors  que  les  lignes  A 1 1  jusqu'a  A 1 5 
doivent  etre  a  1'etat  haut.  Aux  registres  de  chaque  peripherique  seront  ainsi  affectees  des 
adresses  du  type  &F8??,  &F9??,  &FA??  ct  &FB??,  ou  les  deux  derniers  symboles  designe- 
ront  soit  une  interface  de  communication  (de  DC  a  DF)  soit  tout  autre  type  de  peripheri- 
que (de  EO  a  FE). 

On  utilisera  les  instructions  Z80  recopiant  le  registre  B  dans  la  moitie  superieure  du  bus 
d'adresses  (Al 5  a  A8). 

ROMs  auxiliaires 

II  est  possible  d'adresser  des  ROMs  auxiliaires  en  plus  dc  la  ROM  interne.  La  logique 
d'arbitrage  d'adresses  et  de  selection  par  bloc  sera  alors  situee  dans  un  module  connecte 
au  bus  d'extension,  1'ordinateur  fournissant  tous  les  signaux  necessaires  a  ce  dernier. 

Partie  15 :  L'emulateur  de  terminaux  du 
CP/M  Plus 

Dans  la  premiere  partie  de  ce  chapitrc  figure  tin  tableau  de  caracteres  de  controle  (avec 
leur  action).  Ces  actions  s'effectucnt  lorsque  le  BASIC  ou  le  CP/M  2.2  envoie  le  texte  a 
lecran.  Elles  ont  ete  choisies  pour  leur  simplicite  et  pour  leur  fidelite  aux  fonctions  du 
logiciel  de  generation  de  caracteres.  Elles  sont  propres  aux  ordinateurs  AM  ST  RAD  et 
leur  logiciel  ne  peut  done  pas  etre  adapte. 

A  fin  dc  pcrmettre  la  portability  du  logiciel  CP/M  Plus  d'un  ordinateur  a  ! 'autre  pour  un 
environnement  commercial,  il  est  normal  dc  doter  celui-ci  d'unc  diversite  de  fonctions  de 
traitcment  de  texte  standard.  L"implemcntation  du  CP/M  Plus  sur  6128  integre  un  emula- 
tcur  de  terminaux  disposant  de  fonctions  trcs  similaires  a  ccllcs  d'un  terminal  Zenith 
Z19/Z29.  La  procedure  d'install a ti on  du  logiciel  CP/M  Pluscomprend  generalement  une 
option  standard  pour  ce  type  de  terminaux. 

Les  fonctions  de  l'emulateur  dc  terminaux  du  CP/M  Plus  couvrent  une  grande  partie  dc 
celles  du  logiciel  dc  generation  de  caracteres ;  il  faut  noter  toutefois  que  les  codes  dc 
controle  sont  alors  differents. 

Les  caracteres  compris  enlre  &20  et  &FF  sont  affiches  a  la  position  courante  du  curseur. 
Si  le  curseur  n'est  pas  dans  la  derniere  colonne  de  I'ccran.  il  se  deplace  d'une  colonne  vers 
la  droitc.  S'il  se  trouve  dans  cette  colonne  et  que  la  fonction  dc  retour  automatique  a  la 
ligne  est  activee,  il  se  place  a  gauche  de  la  ligne  suivanle.  en  faisant  remonter  le  texte  affi- 
che  si  necessaire. 
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Us  caracteres  de  controle  (compris  entre  &00  et  &1F)  sont  interpret^  comme  suit : 

607  BEL       Signal  sonore. 

608  BS         Espace  arriere.  Deplace  le  curseur  d'une  colonne  vers  la  gauche.  Si  le 

curseur  se  trouve  sur  la  premiere  colonne.  mais  pas  sur  la  premiere  ligne, 

et  que  la  fonction  de  retour  automatique  a  la  ligne  est  activee.  ll  se  place 

sur  la  derniere  colonne  de  la  ligne  superieure. 
&OA      LF         Saut  dc  ligne.  Fait  descendrc  le  curseur  d'une  ligne.  et  remonter  le  texte 

si  necessaire. 
&OD     CR         Retour  chariot.  Place  le  curseur  sur  la  premiere  colonne  de  la  meme 

ligne. 
&1B       ESC       Introduit  une  sequence  de  changement  de  mode. 

Tous  les  autres  codes  de  controle  sont  ignores. 

Les  sequences  de  changement  de  mode  ci-dessous  sont  rcconriues.  Tout  autre  caractere 
suivant  le  caractere  ESC  est  affichc  en  deplacant  1c  curseur.  ce  qui  pcrmct  d  afficher  les 
caracteres  correspondant  aux  codes  dc  controle  &00  a  &1  F.  Dans  de  nombretix  langages 
^application  le  code  de  controle  &09(TAB)  correspond  a  des  espaces  et  la  sequence 
[ESC][TAB]  n'affiche  done  pas  1c  caractere  qui  lui  correspond. 

fESCIO  Desactive  la  ligne  d'etat.  Les  messages  systeme  sont  visualises  par 

une  sortie  ccran  ordinaire,  la  ligne  d'etat  devient  dispomble. 

[Ejjqi  Active  la  ligne  d'etat.  Les  messages  systeme  apparaissent  alors  sur 

la  ligne  inferieure  de  l'ecran. 

[ESC12  <  n  >  Change  le  jeu  de  caracteres  (voir  partie  16  de  ce  chapitre).  n  est  le 

parametre  de  la  languc  choisic.  masque  par  le  code  &07.  Ccrtaincs 
matrices  dc  caracteres  comprises  entre  &20  et  &7F  sont  rempla- 
cees  par  d'autres  caracteres  compris  entre  &80  ct  &FF.  Cctte  com- 
mandc  agit  de  facon  trcs  semblable  ii  la  commande  dc  controle  des 
imprimantes  possedant  des  jeux  de  caracteres  definissablcs  par 
logicicl. 

<n>  =  0  Etats-Unis 

<n>  =  1  France 

<n>  =  2  Allemagne 

<n>  =3  Royaume-Uni 

<n>  =  4  Danemark 

<n>  =  5  Suede 

<n>  =6  Italie 

<n>  =  7  Espagne 


Poor  information 
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[ESC]3  <m>  Change  le  mode  de  l'ecran.  <m>  =  mode  ecran  +  &20.  Cette 

valeur  est  masquee  par  le  code  &3  pour  donner  les  modes  0  a  2.  Le 
mode  3  esl  ignore.  L'ecran  s'cfface  mais  le  curseur  ne  change  pas 
;,.  dc  place. 

Deplace  le  curseur  vers  le  haut  sauf  s'il  se  trouvc  sur  la  premiere 
ligne. 

Deplace  le  curseur  vers  le  has  sauf  s'il  se  trouve  sur  la  derniere 

ligne. 

Deplace  le  curseur  vers  la  droite  sauf  s'il  se  trouve  sur  la  derniere 
colonne. 

Deplace  le  curseur  vers  la  gauche  sauf  s'il  se  trouve  sur  la  premiere 

colonne. 

Efface  la  page.  Le  curseur  ne  change  pas  de  place.  Cette  com- 
mande  efface  la  totalitc  dc  l'ecran,  mcme  en  mode  24  x  80.  (Les 
autres  codes  ESC  n'affectent  que  la  zone  24  x  80  lorsque  le  mode 
24  x  80  est  selectionne.) 

Deplace  le  curseur  jusqu'a  la  premiere  colonne  de  la  premiere 
ligne. 

Deplace  le  curseur  d'une  ligne  vers  le  haut,  en  faisant  descendre  le 
tcxte  si  necessaire. 

Efface  le  texte  jusqu'a  la  fin  de  la  page,  caractere  sous  le  curseur 
compris.  Le  curseur  ne  change  pas  de  place. 

Efface  le  texte  jusqu'a  la  fin  de  la  ligne,  y  compris  le  caractere  situe 
sous  le  curseur.  Le  curseur  ne  change  pas  de  place. 

Insere  une  ligne.  Toutes  les  lignes  situees  sous  la  ligne  du  curseur. 
celle-ci  comprise,  descendent.  La  ligne  se  situant  a  la  position  du 
curseur  est  alors  vide.  La  position  du  curseur  ne  change  pas. 

Supprime  une  ligne.  Toutes  les  lignes  situees  sous  la  ligne  du  cur- 
seur, celle-ci  comprise,  remontent.  La  ligne  du  bas  de  l'ecran  est 
alors  vide.  La  position  du  curseur  ne  change  pas. 

Supprime  un  caractere.  Tous  les  caracteres  situes  a  droite  du  cur- 
seur se  deplacent  d'une  colonne  vers  la  gauche,  laissant  un  espace 
en  fin  dc  ligne.  La  position  du  curseur  ne  change  pas. 

Deplace  le  curseur  jusqu'a  la  position  indiquee.  Si  cclle-ci  se  trouve 
a  I'extericur  de  l'ecran,  le  curseur  se  place  au  bord  de  l'ecran.  <  1  > 

=  ligne  +  &20et  <c>  =  colonne  +  &20.  L'angle  superi cur  gau- 
che de  l'ecran  correspond  a  la  ligne  0,  colonne  0. 
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Pour  information... 


[ESqb  <pc> 


CPC  6128 


Bits  de  couleur 


[ESC]c  <pc 

[ESC]d 

[ESC]e 

[ESC]f 
[ESCJj 
[ESC]k 

[Esqi 

[ESC]o 
[ESCJp 

[ESCJq 

[ESC]r 
[ESC]u 

[Esqv 


Definit  la  couleur  du  texte  et  affecte  tous  les  caracteres  de  1'ecran. 
<pc>  est  !e  parametre  de  la  couleur.  masque  par  le  code  &3F  et 
traite  ensuite  commc  trois  nombres  de  2  bits,  indiquant  chacun 
Tintensite  d'unc  des  trois  couleurs  primaires  :  bits  0.1  pour  lc  bleu, 
bits  1.2  pour  le  rouge  et  bits  3,4  pour  le  vert.  Le  6128  permet  trois 
intensitcs  representees  en  binaire  commc  suit : 


Intensitc  zero 


00 


Demi-intensite 


01  ou  10 


Pleine  intensite 


11 


>  Definit  la  couleur  dc  fond  de  recran.  Affecte  tout  lc  fond  et  la  bor- 

dure  dc  fecran.  Les  couleurs  sont  spccifiees  comme  Pindique  le 

tableau  ci-dessus. 

Efface  le  texte  jusqu'au  debut  de  la  page,  y  compris  le  caractere 
situc  sous  lc  curseur.  La  position  du  curseur  ne  change  pas. 

Desactive  la  trace  du  curseur  pour  un  meilleur  confort  visuel  Le 
curseur  reapparait  1/10  seconde  apres  l'affichage  du  dernier  carac- 
tere entre. 

Reactive  la  trace  du  curseur, 

Sauvegarde  la  position  du  curseur. 

Restitue  la  position  du  curseur  sauvegardee  par  (ESC]j. 

Efface  la  ligne.  La  position  du  curseur  ne  change  pas. 

Efface  les  caracteres  jusqu'au  debut  de  la  ligne,  y  compris  celui  qui 
se  trouve  sous  le  curseur.  La  position  du  curseur  ne  change  pas. 

Etablit  le  mode  video  inverse.  Les  couleurs  de  fond  et  de  texte  des 
caracteres  imprimables  sont  inversees. 

Sort  du  mode  video  inverse. 

Active  le  mode  soulignement  (non  disponible  sur  le  6128). 

Desactive  le  mode  soulignement  (non  disponible  sur  le  6128). 

Le  curseur  passe  en  fin  de  ligne. 


Pour  information.. 
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[ESCJw 

[ESC]x 


[ESC]y 


Supprime  les  caracteres  jusqu'a  la  fin  de  la  ligne. 

Etablit  le  mode  24  x  80.  Pour  certains  programmes  duplication, 
un  ecran  standard  24  x  80  est  necessaire.  Cettc  commande  active 
ce  mode  sans  tenir  compte  dc  la  taille  de  I'ecran,  qui  depend  de 
I'ordinateur.  du  pays  d'utiiisation  et  de  1 'activation  de  la  ligne 
d'etat.  I.c  contenu  de  I'ecran  s'efface. 

Desactive  le  mode  24  x  80.  Le  contenu  de  I'ecran  s'efface. 


Partie  16  :  Le  jeii  de  caracteres  du  CP/M  Plus 

Dans  la  partie  10  de  ce  chapitre  figure  une  table  de  conversion  des  caracteres  du  BASIC 
et  du  CP/M  2.2  sous  une  forme  correspondant  a  la  langue  selectionnee  par  Pimprimante. 
Ccllc  possibility  de  transcodage  est  ccpendant  limitee.  car  le  jeu  de  caracteres  du  BASIC 
comprend  tres  peu  de  caracteres  clrangers  par  rapport  aux  imprimantes. 

Cette  conversion  opere  egalement  sous  CP/M  Plus  mais  le  jeu  de  caracteres  a  ete  ameliore 
pour  permettre  une  correspondance  quasi  totale  entre  caracteres  afflches  et  caracteres 
imprimes  (le  seul  symbole  manquant  a  I'ecran  est  le  symbole  monetaire  suedois  rempla- 
cant  le  S).  La  table  ci-dessous  confirme  1'etenduc  de  la  correspondance. 


23     24    40  5B    5C  5D  5E  60  7B  7C    7D  7E 

Etats-Unfs 

iiii\it?€*>" 

France 

n  i  i  ?  i  f  *  i  £  o  £  m 

Allemagne 

lifftOilf  va*oae 

Royaume-Uni 

£l0EMt  M  £  1  >  ~ 

Danemark 

iieiiiiiisi? 

Suede 

Ilidsii^IIai 

Halle 

Iiei^#t0ig$i 

Espagne 

|tiifi«t^-"|>- 

Jeu  de  caracteres  international  du  CP/M  Plus 
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Pour  information... 


Voici  la  marchc  a  suivre  pour  exploiter  I'ordinateur  dans  une  langue  autre  que  1'ameri- 


cam  : 


! .  Selectionner  sur  I'imprimante  la  langue  desiree  (le  plus  souvent  a  Paide  de  rnkro-inter- 
rupteurs  DIP ;  certaines  imprimantes  acceptent  cependant  les  codes  de  controle). 

2.  Selectionner  le  jeu  de  caracteres  ecran  correspondanl.  par  la  commande  : 

LANGUAGE  <n> 
ou  par  envoi  du  code 

[ESC]2<n>] 
a  1'emulateur  de  terminaux. 

En  pratique,  cette  initialisation  peut  s'effectuer  dans  le  cadre  de  1?  procedure  PR  OF  I L  E  - 
SUB  a  1'aide  des  Tonctions  LANGUAGE  et  SETLST.  A  l'exped.tion  le  CP/M  Plus  est 
confkure  en  version  americaine.  essentiellement  parce  que  le  clavier  dispose  du  signed 
sur  la"touche  3.  Le  clavier  americain  est  tres  souvent  utilise  pour  le  tratfement  de  texte. 

Logiciel  7  bits... 

Bien  que  tres  puissante,  cette  fonction,  qui  remplacc  les  caracteres  «  normaux  >>  (ameri- 
cains)  par  ceux  de  la  langue  choisie.  ne  permet  plus  d'afficher  cos  caracteres  1  sagil  la 
d'un  alcas  courant  et  inevitable  des  logiciels  a  7  bits.  Presque  tous  les  logtc.es  (memeles 
utilitaires  du  CPM  Plus,  les  traitcments  de  texte)  operent  sur  un  jeu  de  caracteres  a  /  bit* 
settlement.  Pour  le  Royaumc-Uni.  la  disparition  du  signc  «  au  proht  du  symbole  mone- 
taire  £  est  plutot  bien  acceptec.  surtout  en  traitement  de  texte  ;  quant  au  listage  des  pro- 
grammes, LIST  £  8.  par  cxemple,  lutilisateur  s'habitue  a  faire  la  conversion  mentalement. 

Malheurcusemcnt,  pour  les  autres  langues.  certains  caracteres  remplacent  la  barre  verti- 
cale  et  les  crochets.  Cat  bien  sur  plus  pratique  pour  la  lisibilite  des  caracteres  accentucs. 
mais  pour  les  programmes  ^application  neccssitant  ces  signes.  D1R  [ALL],  par  exempie 
la  commoditc  de  lecture  ct  de  frappc  (si  les  touches  sont  modifieesKen  trouve  ncttcmen 
reduite  N'oubliez  pas  que  les  programmes  travaillent  en  valcurs  ASCII,  qui  se  soucient 
peu  des  caracteres  affiches  a  1'ecran  et,  avec  un  logiciel  a  7  bits,  cellcs-ci  ne  sont  pas  assez 
nombrcuses. 
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Exploitation  du  systeme  avec  des  jeux  de  caracteres  a  8  bits 

Le  jeu  de  caracteres  BASIC  posscde  256  sym boles  diflcrcnts  ;  les  valeurs  128  a  255  (&80  a 
&FF)  correspondent  aux  differents  symboles  graphiques  pour  les  jeux  et  les  applications 
individuelles  (personnages.  cur/car rcau/pique/trefle,  etc.).  Le  CP/M  Plus  possedc  egale- 
ment  256  caracteres.  mais  les  128  derniers  different  de  ceux  du  BASIC  :  ils  apportent  a 
Penvironnement  du  CP/M  Plus  une  louche  a  caractere  international  et  professionncl. 


0123456789ABCDEF  O  1  2  3  4  5  6  789  A  B  C  D  E  F 

3  ©I234S6789  «»<■>«  b  £  G  "  '  *  •£**HH?iB&  *  ¥Q™ 

4  B  ABCDEFGHI  JKLMNO  c  Siifi68l  £S  a  H  Hit 
liiSIBSB8¥ZC\3t_  D  si  ieSCf  a0  jigSM^s 
vabc*efsfiidklBne  E  ££iou3@iSu£td£o«i 


5 

6 

7    p««rsfcu«wxaz'€t>~&        f    aei»Miasnto4^«  = 


Caracteres  0  a  127  (&00  a  &7F)  Caracteres  128  a  255  (480  a  &FF) 

Jeu  de  caracteres  standard  du  CP/M  Plus 


Les  logiciels  fonctionnant  avec  des  caracteres  de  8  bits  peuvent  exploiter  ce  jeu  de  caracte- 
res pour  tracer  des  cases,  comme  le  montre  la  figure  ci-dessus,  mais  aussi  pour  acceder 
dircctcmcnl  a  toutes  les  langues  sans  modification  specifique  de  clavier.  Les  caracteres 
tcls  que  les  barres  verticales  et  les  crochets  sont  egalemcnt  disponibles. 

Les  logiciels  a  8  bits  sont  encore  trcs  rares  et  les  caracteres  0  a  31  et  128  a  255  n'apparai- 
:ront  que  rarcment  a  1'ecran  tels  qu'ils  figurent  ci-dessus.  Les  imprimantes,  par  contre, 
-estitueront  ccs  symboles  plus  fidelemcnt. 
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Chapitre  8 

Complement  d'information  sur  le     •  I  -^f?? 

Gestionnaire  de  Blocs  BANK  MANAGER 


Les  extensions  du  BASIC  permettent  d'acceder  au  second  bloc  des  64  KO 
de  RAM. 

Sujets  abordes: 


*  Stockage  des  images  eeran 

*  Fonctionnement  des  fichiers  virtuels 


Comme  1'indique  la  topographie  de  la  mcmoire  du  BASIC  1.1  (representee  a  la  panic  14 
du  chapitre  7).  sur  les  128Ko  de  RAM.  64Ko  restent  inutilises.  Le  BASTC  et  les  program- 
mes systeme  resident  dans  la  ROM  qui.  ajoutee  a  la  ROM  disquette.  ctend  la  memoirc 
de  64Ko  a  1 12Ko  (64Ko  dc  RAM,  48Ko  de  ROM). 

Chaque  lot  dc  I6K0  s'appellc  un  «  bloc  »  ct  quatre  blocs  (soit  64k o)  forment  un  banc. 
C'est  pourquoi  la  technique  de  selection  des  blocs  se  nomme  «  changement  de  bancs  ». 

Le  microproccsscur  Z80  ne  peut  gcrer  que  64Ko  a  la  fois.  aussi  le  systeme  d "exploitation 
contient-il  des  instructions  qui  sollicitent  la  ROM  des  microprogrammes.  plutot  que  le 
bloc  {)  de  la  RAM,  et  la  ROM  du  BASIC  ou  de  la  disquette,  plutot  que  le  bloc  3.  Cc 
changement  dc  blocs  intervient  aulomatiquement  lorsquc  le  BASIC  ou  les  micropro- 
grammes sont  rcquis.  Ce  procede  csl  egalement  applique  a  la  RAM  pour  favoriser  le 
recouvrement  de  la  RAM  plutot  que  celui  dc  la  ROM.  Le  changement  est  assurcc  par  un 
programme  redige  en  assembleur. 

Le  programme  BAN  K MAM .  BAS  reside  sur  la  face  1  d'une  des  disquettes  systeme.  S'il 
est  execute  apres  lancement  du  BASIC,  il  instaure  le  code  RSX  de  gestion  de  blocs,  d'ou 
son  appellation  de  «  gestionnaire  de  blocs  ». 

La  deuxicmc  partie  des  64  Ko  dc  memoire  sert  nolammcnl  d'espace  provisoire  de 
stockage  de.s  ecrans  graphiques.  Elle  pcrmellra  par  exemple  de  stocker  un  programme 
de  dessin  tcl  que  «  Salut  1'artiste  »  possedant  plusieurs  ecrans  differents.  ou  un  jcu  video 
comportant  plusieurs  ecrans  deja  prets. 

Cette  partie  de  la  mcmoire  permet  aussi  d'etendre  1'espace  de  travail  des  variables,  qui 
peut  etre  considere  comme  une  extension  de  Tespace  reserve  aux  chaines,  ou  tout  simple- 
ment  comme  disque  virtuel  (sur  RAM). 
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Partie  1 :  Stockage  des  images  d'ecran 


Choisissez  votre  6cran... 

BANK  MANAGER  pcut  mcttre  le  bloc  1  de  cote  et  selection ner  a  sa  place  1'un  des  qua- 
tre  blocs  des  derniers  64  Ko  de  la  memoire,  com  me  1'illusirc  lc  dia  gramme  ci-dessous. 
Vous  remarquerez  que  chaque  bloc  dc  cette  partie  de  la  memoire  occupe  la  meme  adresse 
(&4000  a  &7FFF).  Le  comenu  <iu  bloc  1  (probablement  lc  bloc  central  de  votre  pro- 
gramme en  BASIC)  est  preserve  et  restitue  lorsquc  BANK  MANAGER  a  terminc.  !1 
existe  trois  autres  selections  dc  bancs  possibles  (outre  les  cinq  representees  ci-dessous) 
ma  is  el  les  ne  scrvent  qu'a  implementer  le  CP'M  Plus. 


Changement  materiel  de  bancs 


BANK  MANAGER  gere  deux  commandes  de  deplaccmcnt  d'ecrans  d*un  bloc  a  I'autre. 
Les  blocs  4  a  7  sont  selectionnes  scion  les  besoins. 
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La  commande: 

'SCREENSWAP.[  < zone  ecran > ,]  <  numero  d'ecran > ,  <  numero  d'ecran > 

intervertit  le  contenu  des  deux  blocs. 

La  commande: 

SCREENCOPY.[  <  zone  ecran  >,)  <  numero  d'ecran  cible  > .  <  numero  d'ecran 

source  > 

copie  le  contenu  d'un  bloc  dans  un  autre  bloc. 

Le  parametre  facultatif  <  zone  ecran  >  provoque  la  copie  d'l  /64  du  bloc  (soit  256  octets 
des  16Ko)  Tl  peut  varier  de  0  a  63.  Ce  mode  pcrmet  d'effectuer  une  autre  tacne  entre  deux 
operations  dc  copie.  L'echange  dc  contcnus  d'ecrans  dure  environ  150/300  secondes  (soit 
150  unites  TIME). 

Le  premier  <  numero  d'ecran  >  doit  etre  1  (ecran  normal)  et  le  second  peut  prendre  Ies 
valeurs  2  \  4  ou  5.  Les  copies  ou  echanges  d'ecrans  faisant  intervenir  1  ecran  1  comme 
cible  ou  comme  source  sont  bien  plus  rapides.  Comme  pour  la  copie  d'ecrans  sur  de- 
queue il  convient  de  veiller  au  defilement  d'ecran  genere  par  le  materiel.  II  faut  pour  ce  a 
conslruire  cl  visualiser  toutes  les  images  ecran  avec  la  meme  position  matenclle  que  celle 
de  1'ecran  1,  le  plus  simple  etant  de  faire  appe)  a  la  commande  MODE . 

Pratique  des  commandes  de  changement  d'ecrans 

Commence/  par  lancer  le  programme  BANK  MANAGER  a  partir  de  la  face  1  d'une  des 
disquettes  systeme: 

RUN    "BANKMAN" 

Tapez  ensuite: 

MODE    1 

Le  contenu  de  1'ecran  s'efface.  Tapez  alors: 

'Ceci  est  1'ecran  original 

!SCREENC0PY,3, i  'Stocke  1'ecran  original  en  aemoxre  No  3 

CLS 
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Le  contenu  de  l'ecran  s'efface  de  nouveau,  Tapez:  ; 

'Ceci    est    l'ecran  interfliediaire 

I SCREENCQPY, 2, i    '  Envoi    l'ecran   intermediaire  en  mem   2 

!SCREENSWAP,2,3   '  Echange    la   memoire  2  et    la  memoire   3 

ISCREENCOPY, 1,3    '  Fait   venir   a  l'ecran    la  memoire  3 

JSCREENCDPY, 1,2    '  Fait   venir    a    l'ecran    la  memoire  2 

Pour  terminer,  la  derniere  partie  du  chapitre  9  comprend  un  programme  complet,  «  Salut 
Fartiste  »,  qui  met  en  jeu  les  fonctions  de  changement  d'ecrans  dc  BANK  MANAGER. 


Partie  2:  Fonctionnement  des  fichiers  virtuels 


Encore  ces  maudits  fichiers  ... 

Pris  comme  disque  virtue!,  les  derniers  64Ko  de  memoire  sont  divises  en  plusieurs  enre- 
gistremcnts  de  longueur  fixe,  constituant  un  fichicr  virtue!  (de  memoire  RAM).  Cette  lon- 
gueur doit  etre  comprise  entre  0  et  255  octets,  2  octets  etant  le  minimum  recommande. 
Aprcs  avoir  fixe  la  longueur  dc  chaquc  enrcgistrement  virtuel.  vous  pourrez  y  acceder: 
grace  a  son  numero.  Rien  nc  vous  empechc  d'ecrire  le  fichier  virtuel  avec  telle  ou  telle 
longueur  d'enregistrement,  et  de  le  lire  avec  une  longueur  diffcrcntc. 

Remarque  :  Ce  fichier  virtuel  ne  peut  contenir  que  des  donnees.  En  effet,  rien  n'est  prevu 
pour  qu'il  puisse  contenir  des  instructions  de  programmes  executables. 

Commc  pour  les  fichiers  a  acces  selectif.  ce  fichier  virtuel  rep  rend  la  notion  de  numero 
d'enregistrement  courant.  Ceci  permet  ["utilisation  d'un  numero  d'enregistrement  par 
defaut.  particulierement  utile  pour  les  recherches  a  1'interieur  du  fichier. 

La  commande : 

I  BAN KOPEN,<  longueur  d'enregistrement  virtuel > 

fixe  la  longueur  de  tous  les  enregistrements,  ainsi  que  la  valeur  zero  pour  I'enregistrement 
courant,  mais  N'EFFACE  AUCUNEMENT  le  contenu  de  la  memoire. 

La  commande : 

■  BANKWRITE,f«    <code  retour>,<chaine  alphanumerique>  [,< numero 
d'enregistrement  virtuel  >  ] 

ecrit  la  <chafne  alphanumerique>  dans  le  fichier  virtuel. 


Chapitre  8    Page  4  Batik  Manager  :  complement  d' informations 


Le  <  numero  d'enregistrement  virtuel  >  definit  Fenregistrement  en  cours  d'ecriture.  S'U 
est  omis.  ce  parametre  est  remplace  par  le  numero  d'enregistrement  courant.  Le  pointeur 
d'enregistrement  passe  ensuite  a  1'enregistrement  suivanl. 

Si  la  <chaine  alpha  numerique>  ne  remplit  pas  entierement  1'enregistrement,  les  anciens 
caraclcres  (non  ecrases)  restent  en  fin  d'enregistrement.  Si  la  chaine  est  plus  longue  que 
l'enregistremenl.  les  caracteres  en  excedent  sont  supprimes  pour  eviter  leur  «  denote- 
ment »  dans  1'enregistrement  suivant. 

Le  <code  retour>  est  une  variable  entiere  correspondant  au  numero  d'enregistrement 
qui  vient  d'etre  ecrit  (si  r operation  a  abouti).  Si  1'opcration  a  echoue.  pour  une  raison 
quelconque.  ce  code  est  negatif. 
-1  fin  dc  fichier.  indiquc  que  I'adresse  du  numero  d'enregistrement  demande  depasse 

64Ko. 
-2  erreur  lors  d'un  changement  de  bloc,  ce  qui  ne  devrait  jamais  se  produire. 


Exemples: 


I6ANKOPEN.10 

!BANKWRlTE,3r7.,"123  test", 8 
:BANKWRITE,3r'/.,w* 

La  commande:  .' 

■  BANKREAD,(«    <code  retour>.(«    < chaine  alphanumcriquO  [,< numero 
d'enregistrement  virtuel >  ] 

lit  un  enrcgistrement  et  le  copie  dans  ia  chaine  a  parti r  du  fichier  virtuel. 

Le  <  numero  d'enregistrement  virtuel  >  definit  1'enregistremcnt  a  lire.  S'il  est  omis,  ce 
parametre  est  remplace  par  le  numero  d'enregistrement  courant.  Le  pointeur  d'enre- 
gistrement passe  ensuite  a  renregistrement  suivant. 

Si  le  contenu  de  1'enregistremcnt  ne  remplit  pas  entierement  la  chaine.  les  anciens  caracte- 
res (non  ecrases)  restent  a  la  fin  de  la  chaine.  Si  ce  contenu  depasse  la  longueur  de  la 
chaine.  les  caraclcres  en  excedent  sont  supprimes  car  la  longueur  d'une  chaine  ne  peut 

pas  etre  augmemee  au  cours  d'une  commande  exlerne. 

Le.  <code  retour>  est  une  variable  entiere  correspondant  au  numero  d'enregistrement 
qui  vient  d'etre  lu  (si  1 'operation  a  abouti).  Si  1'operation  a  echoue,  pour  une  raison  quel- 
conque, ce  code  est  negatif. 

-1  fin  de  fichier,  indique  que  fadresse  du  numero  d'enregistrement  demande  depasse 
64Ko. 

-2  erreur  lors  d'un  changement  de  bloc,  ce  qui  ne  devrait  jamais  se  produire. 

Exemple: 

!BANKR£AD,3r7.,i*,8 
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Recherche 

I]  est  possible  de  rechercher  une  chaine  particuliere  a  1'interieur  des  enregistrements 
stockes. 

La  commande: 

BAIMKFIND/a    <code  retour>,< chaine  rechercheO   [,<  numero  d'enre- 
gistrement  de  depart  >  [,<  numero  d'enregistrement  de  fin>  ]] 

passe  tous  les  enregistrements  virtuels  en  revue.  Le  <  numero  d'enregistrement  de 
depart >  specifie  le  debut  de  la  recherche.  S'il  est  omis,  la  recherche  commence  a  l'enre- 
gistrement  courant. 

La  recherche  procede  enregistrcment  par  enregistrcmcnt.  a  1'interieur  des  64  derniers  Ko 
de  la  memoirc.  jusqu'a  trouver  la  chaine  desiree. 

Si  un  <  numero  d'enregistrement  de  fin  >  a  ete  specifie,  la  recherche  s'arrctc  aprcs  cxa- 
men  de  cet  enregistrement,  a  moins  que  la  chaine  n'ait  etc  trouvee  avant  d'atteindre  cet 

enregistrcmcnt. 

Si  ia  recherche  aboutit.  le  pointeur  prend  la  valcur  du  numero  d'enregistrement  contenant 
la  chaine  recherchee  (sinon  celui-ci  ne  change  pas). 

Le  <code  retour>  est  une  variable  enticre  corrcspondant  au  numero  d'enregistrement 
contenant  la  chaine  recherchee  (si  {'operation  a  abouti).  Si  l'operation  a  echoue.  pour  une 
raison  quelconque,  le  code  de  retour  est  negatif. 

-1  fin  de  fichier,  indique  que  I'adresse  du  numero  d'enregistrement  de  depart  depasse 
64Ko  ou  qu'elle  est  superieure  a  celle  de  Tenregistrement  de  fin  de  recherche. 

-2  erreur  lors  d'un  changement  de  bloc,  ce  qui  ne  devrait  jamais  se  produire. 

-3  pas  de  chaine  retrouvee.  •  ' 

La  <  chaine  rechercheO  pcut  contcnir  des  jokers,  indiques  par  des  caracteres  nuls: 

CHR$(0),  et  la  comparaison  s'effectue  par  rapport  a  la  <  longueur  d'enregistrement  vir- 
tuel  >  ou  a  la  longueur  de  la  <  chaine  recherchee  > ,  si  celle-ci  est  plus  courte. 


Exemples: 


!BANKFIND,8rX,"J23  test%« 
iBANKFIND,9rM»,iUQ,2BB 


*,? 
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Ne  ratez  pas  la  correspondance  ;• ;  *^* ;' . ' 

Les  erreurs  evidentes.  telles  qu'un  nombre  de  parametres  errone,  sont  signalees  par  le 
message  d'erreur  «  Bad  command  »  (commande  crronce).  Cependant.  les  commandes 
Sternes  ne  detectent  pas  les  erreurs  de  «  Type  mismatch  » (type  de  vanab  e  ne  corres- 
pondant  pas).  L/utilisateur  doit  done  veiller  a  utiliser  des  parametres  corrects. 

Le  programme  ci-dessous  cxploite  les  commandes  de  disque  virtuel  pour  etablir  et  inter- 
rocer  une  base  de  donnecs  comportant  des  anagrammes  de  mots  dc  7  lettres.  II  vous 
donnc  les  mots  qui  conviennent  et  autorise,  en  outre.  1  emploi  de  jokers. 

Par  cxemple,  les  anagrammes  de  FIG U  RES  qui  se  presented  sous  la  forme:  ?RUGS7? 
(les  deux  derniers  points  d'interrogation  peuvent  eventuellement  e  re  suppnmes)  sont 
FRUGSIE,   FRUGSEI.  IRUGSFE,  IRUGSEF.  IRUGSFI  et  IRUGSIF 

II  faut  un  certain  temps  au  programme  pour  etablir  la  base  de  donnees,  mais  la  taille  de 
la  memoire  a  gcrer,  64K.O,  le  justifie. 

10  '  ANAGRAMMES  par  ROLAND  PERRY 
20  '  copyright  (c)  AMSOFT  1985 

40  ■  Rappelez  vous  de  faire  RUN"BANK«AN"     avant  de  lancer 

5V0O'HUUrHmHU*$*HI*HI*»**ttltll*tMtt»t*UI*ttMI* 

60  ' 

70  MODE  2 

80  DEFINT  a-z 

90  rX=0: 1BANKQPEN,7         ,  .  it    „   « 

100  INPUT  "Donnez  un  mot  de  7  lettres  }■» 

110  IF  LEN(s*)<>7  THEN  108 
120  PRINT  "  patientez. . ." 

130  LOCATE  1 , 5! PRINT  "computings 

140  FOR  cl*l  TO  7 

150  FOR  c2«l  TO  7 

160  IF  c2=cl  THEN  370  , 

170  FOR  c3=l  TO  7 

180  IF  c3=c2  OR  c3=cl  THEN  360 

190  FOR  c4*i  TO  7  , 

200  IF  c4=c3  OR  c4=c2  OR  c4=cl  THEN  350 

220  IF  c5=c4  OR  c5=c3  OR  c5=c2  OR  c5=cl  THEN  348 

240  "Rc6=c5  5r  C6=c4  OR  c6=c3  OR  c6«c2  OR  c6=cl  THEN  330 

111  IF°Rc5=^  Jr  cVcS  OR  C7=c4  OR  c7«c3  OR  c7=c2  OR  c7*ci  TH 
EN  320 
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i)+NID*(s*,c5fl)+HID$(B*,c6>i»+MID*(s*,c7,i) 

288  LOCATE  12,5:PRINT  x;o$ 

!8ANKWRITEf8rX,o* 

IF  r%<0  THEN  STOP 

x=x  +  t 

NEXT  c7 

NEXT  c6 

NEXT  c5 

NEXT  c4 

NEXT  c3 

NEXT  c2 

NEXT  cl        . 

lastrec=r% 

'  pour  les  visual iser 

rX=0:g$=SPACE*(7i 

PRINT: INPUT  "ANAGRAMME  a  RETROUVER  (Utilise?  <?>  coiae  j 


290 
300 
310 
320 
330 
340 
350 
360 
370 
3B0 
390 
408 
410 
420 


ocker) 


,  m$ 


430 
440 
450 
460 
470 
480 
490 
500 
510 
520 


«*=LEFT*(«*,7) 

FOR    x=l    TO   LEN(fflt) 

IF    MID*((n*,x, !)="?"    THEN    MI  D»  («*,  x  ,  1  )  =  CHR$  (0) 
NEXT 

iBANKFIND,3rX,is$,0,Ustrec 
IF    rX<0    THEN    GOTO    420 
!BANKREAD,3rX,g* 
PRINT    g*f 

!BANKFlND,3rX,n$,rX+l,lastrec  ■■ 
GOTO   480 
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Chapitre  9 

A  vos  heures  de  loisir... 


Ce  chapitre  aborde  en  douceur  certaines  notions  fondamentales  de  1  mfor- 
matique  en  general  et  du  6128  en  particulier.  Bien  qu'il  ne  son  pas  indis- 
pensable de  le  lire  avant  d'utiliser  votre  ordinateur,  il  pourra  vous  aider  a 
mieux  comprendrc  ce  qui  se  passe  «  sous  le  capot ». 


Partie  1 :  Generalites 

Feu  sur  les  envahisseurs  de  1'espace ! 

Metne  si  votre  seule  passion  des  jeux  video  motive  votre  achat  du  6128,  vous  etes  peut- 
etre  curieux  de  connaitre  ce  que  recouvrent  les  termes.  Le  materiel  est  constitue  de  tout 
ce  que  vous  pouvez  toucher  (le  clavier,  I'ecran,  les  cables  de  raccordement,  etc.),  le  reste 
repondant  a  1 'appellation  de  <«  logiciel  »  (programmes,  manuels  et  informations  sur  dis- 
que  ou  cassette). 

Certaines  actions  de  1'ordinateur  dependent  du  materiel,  mais  c'est  au  logiciel  de  les  utili- 
ser  pour  produire  des  textes  et  des  graphiques  a  I'ecran. 

Le  materiel  dirige  le  canon  a  electrons  sur  1'affichage  electroluminescent  du  moniteur,  le 

logiciel  ordonne  et  distribue  remission  afin  de  produire  des  sequences  significative*  sur 
I'ecran  :  reflet  de  decollage  du  vaisseau  spatial,  ou  I'apparition  d'une  lettre  a  I  ecran  lors- 
que  vous  appuyez  sur  la  touche  correspondante  du  clavier. 

Question :  Pourquoi  un  ordinateur  est-11  meiUeur  qu'un  autre  ? 

Un  materiel  sans  logiciel  ne  vaut  rien,  et  inversement.  II  ressort  done  que  la  valeur  des 
performances  d'un  ordinateur  ne  peut  venir  que  de  I'integration  harmomeuse  des  deux, 
permeltant  de  realiser  differentes  taches.  II  existe  plusieurs  moyens  de  juger  les  perfor- 
mances logicielles  et  materielles  d'une  machine. 
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Les  criteres  generalement  admis  pour  qualifier  les  ordinateurs  personnels  sont  actuelle- 
ment : 


1.  La  resolution  de  1'ecran  :  le  plus  petit  element  visible  de  Paffichage 

Elle  resulte  d'une  combinaison  d'elements  differents :  nombre  de  couleurs  disponibles, 
nombre  de  pixels  (petits  points),  nombre  de  caracteres  de  texte  definissables  par  ecran. 
Vous  conslaterez  que  1c  6128  dispose  de  caracteristiques  cxtremement  interessantcs  dans 
ce  domatne. 


2.  L'interpreteur  BASIC 

.>■;  I 

Presque  tous  les  ordinateurs  familiaux  possedent  un  interpreteur  BASIC  qui  permet  de 
se  lancer  rapidement  dans  la  conception  de  programmes.  Le  BASIC  integre  a  la  machine 
est  lui-meme  un  programme,  mais  extremement  elabore  et  complique,  ayant  necessite  des 
millions  d'heures  de  travail  pour  sa  mise  au  point,  depuis  son  «  invention  »  aux  USA.  Le 
«  Beginners  All  Purpose  Symbolic  Instruction  Code  »  (langage  symbolique  tous  usages 
pour  debutants)  est  le  plus  utilise  de  Pinformatique  personnelle  et,  comme  tous  les  Ianga- 
ges,  il  possede  de  nombreux  «  dialectes  ». 

Lc  BASIC  disponible  sur  le  6128  est  1'un  des  plus  compatibles  et  pcut  utiliser  des  pro- 
?iciels  ecrits  sous  le  systeme  d'exploitation  de  disquette  CP/M.  C'est  une  implementation 
:res  rapide  du  BASIC  et  bien  qu'il  ne  vous  semble  pas  qu'il  y  ait  une  grande  difference 
jntre  0,05  et  0,125  secondc,  sur  des  milliers  d'instructions  a  traiter,  le  meme  programme 
«ra  presque  trois  fois  plus  rapide  d'une  version  a  I'autre. 

/ous  entendrez  souvent  parler  de  langage  machine  :  c'est  le  seul  langage  que  la  machine 
:omprenne  directement ;  il  est  tres  rapide  mais  desesperement  long  a  programmer,  c'est 
lourquoi  on  utilise  le  BASIC  couple  a  un  interpreteur  pour  la  traduction  en  langage 

nachine. 


■:i  V 
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•Le  BASIC  de  votre  AMSTRAD  est  un  des  plus  rapides  et  des  plus  complets  que  Ton 
puisse  trouver  sur  un  micro  familial.  II  est  susceptible  de  pallier  certaines  lenteurs  inheren- 

tes  aux  langages  de  haut  niveau  et  dispose  d'effets  graphiques  et  sonores  surprenants. 

3.  Extension 

La  plupart  des  ordinateurs  sont  prevus  pour  recevoir  des  extensions  materielles  telles 
qu'imprimantes.  manettes  de  jeu,  lecteurs  de  disquettes  supplementaires.  Pourtant  de 
nombreux  micro-ordinateurs  familiaux  vous  obligent  a  acheter  des  interfaces  d'extcnsion 

avant  de  pouvoir  brancher  un  dispositif  aussi  simple  qu'une  imprimante  ou  une  manette 
dejeu. 

Bien  que  I'acheteur  ne  considere  pas  toujours  ses  besoins  future,  une  machine  possedant 
deja  une  interface  pour  imprimante  (type  Centronics)  et  une  interface  pour  manette  de 
jeu  est  plus  economique  a  long  terme. 

Le  6128  possede  d'origine  une  interface  Centronics,  une  entree  pour  unite  de  disquette 
supplemental,  une  prise  pour  un  lecteur  de  cassette  (el  une  commande  moteur),  une 
interface  pour  deux  manettes  dejeu.  une  sortie  stereo  et  un  bus  d'extcnsion  pouvani  rece- 
voir des  lecteurs  de  disquettes.  des  cartouches  ROM.  une  interlace  scne  (AMSTRAD 
RS232C).  des  modems,  des  synthetiseurs  de  parole  (AMSTRAD  SSA2),  des  stylos  opti- 
ques,  etc... 


4.  Les  effete  sonores 

Les  caracteristiques  sonores  en  micro-informatique  vont  du  systeme  qui  fait  des  bruits 
plus  ou  moins  cacophoniques  a  celui  capable  de  stmuler  un  instrument  de  musique 
elect ronique.  Les  3  canaux  ct  8  octaves  du  6128  lui  permettent  de  produire  des  sons 
d'une  bonne  qualite  musicale  avec  controle  total  de  1' amplitude  et  des  enveloppes  de  tona- 
lite.  De  plus,  1'emission  est  authentiquement  stereophonique,  avec  un  canal  a  gauche,  un 
a  droite  et  un  troisieme  au  milieu. 

Vous  pourrez  ainsi  produire  des  ambiances  sonores  impressionnantes,  synchronisees  avec 
les  effets  graphiques. 

Finalement,  e'est  a  vous  de  voir  ce  qui  est  le  plus  important  pour  vous.  Nous  sommes 
surs  que  vous  trouverez  a  votre  machine  des  qualites  que  nous  n'aurions  meme  pas  soup- 
connees. 
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Pourquoi  un  micro  ne  pent-il  pas  faire  cela  ? 

Les  utilisateurs  se  demandent  souvent  pourquoi  un  ordinateur  ne  peut  produire  des  ima- 
ges comme  on  en  voit  a  la  television.  Pourquoi,  par  exemple,  un  micro  ne  peut-il  animer 
un  dessin  comme  dans  un  dessin  anime  ou  un  film  ?  Pourquoi  les  personnages  sont-ils 
toujours  simplifies  ? 

La  reponse  est  simple  et  complexe  a  la  fois.  La  reponse  simple  est  que  I'ecran  d'un  ordina- 
teur est  beaucoup  plus  sommaire  qu'un  ecran  TV  (meme  si  l'ordinateur  utilise  un  poste 
TV,  il  n'utilise  qu'une  partie  des  circuits).  La  capacite  memoire  d'une  image  retransmise 
a  la  tele  est  environ  20  fois  plus  importante  que  celle  d'un  ordinateur.  De  plus,  pour  etre 
animes,  tous  les  points  de  cette  image  doivent  changer  50  fois  par  seconde.  Les  ordina- 
teurs  capables  d'une  telle  performance  sont  encore  de  nos  jours  hors  de  portee  de  bien 
des  budgets. 

Les  micros  doivent  se  debrouiller  avec  une  memoire  relativement  petite  comparee  aux 
mega-ordinateurs.  Leurs  images  sont  done  plus  saccadees  et  leur  resolution  d'eeran  bien 
moins  elevee,  Bien  que  1'on  s'en  approche  un  peu  plus  chaque  jour,  on  est  encore  assez 
loin  des  dessins  animes  qu'on  vott  a  la  television. 


Le  clavier :  un  air  de  deja  vu... 

Pourquoi  ne  peut-on  simplement  s'asseoir  devant  un  micro  et  taper  une  page  de  texte 
dans  la  machine  ? 

Ne  vous  laissez  pas  induire  en  erreur  par  le  fait  qu'un  ordinateur  ressemble  a  une  machine 
a  ecrire  avec  un  ccran ;  e'est  un  appareil  qui  communique  avec  vous  par  Pintermediaire 
d'un  langage  de  programmation.  Et  aussi,  a  moins  que  vous  ne  le  dotiez  d'un  progiciel 
de  traitement  de  texte,  il  vous  repondra  par  le  message  : 

SyntaK  error 

...Iorsque  vous  taperez  n'importe  quelle  phrase  suivie  de  [RETURN] . 
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Pour  taper  une  phrase  puis  [RETURN]  et  attendre  de  l'ordinateur  qu'il  se  comporte 

comme  une  feuille  de  papier  electronique  dans  une  machine  a  ecrire  sophistiquee,  il  faut 
d'abord  lui  avoir  charge  un  programme  lui  disant :  «  nous  allons  taper  une.lettre  ». 

L'ordinateur  semhle  combiner  plusieurs  appareils  familiers  :  un  ecran  de  television,  un 
clavier  de  machine  a  ecrire  et  un  magnetophone  a  cassette.  Vous  devez  toutefois  vous 
rappeler  que  ces  ressemblances  sont  superficielles,  Fordinateur  ayant  des  capacites  d'un 
autre  ordre  et  etant  destine  a  un  usage  completement  different  -  une  personnahte  au-de!a 
des  apparences ! 
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Mais  qui  a  peur  du  jargon  informatiqoe  ?  'A&BT3F- 

Comme  beaucoup  d'industries  specialises,  I'informatique  a  developpe  son  propre  jar- 
gon, un  moyen  rapide  de  parler  de  choses  compliquees  qui  demanderaient  beaucoup 
d'explications  en  Iangage  courant.  Tous  les  corps  de  metiers  utilisent  plus  ou  moins  une 
forme  de  jargon  Ieur  permettant  de  parler  de  leur  metier  de  la  facon  la  plus  concise  pos- 
sible. 

Une  des  differences  avec  le  jargon  legal,  par  exemple,  est  que  les  confusions  de  ce  dernier 
viennent  plus  de  la  facon  dont  les  mots  sont  utilises  que  des  mots  eux-memes. 

Le  jargon  informatique  utilise  des  mots  simples,  empruntes  au  Iangage  courant  (bien  sou- 
vent  anglophone),  pour  decrire  directement  et  sans  ambiguite  les  concepts  precis  de  la 
science  qu'il  sert.  Au  contraire  d'une  barriere,  il  est  un  outil  de  communication  puissant, 
a  1'image  des  langages  de  programmation,  dont  certains  seraient  tentes  d'elever  la  mai- 
trise  au  rang  d'expression  artistique  ! 

L'mformatique  est  comprise  rapidement  par  les  jeunes  qui  en  apprecient  la  precision  et 
la  simplicite.  Ne  voit-t-on  pas  plus  de  programmeurs  de  10  ans  que  d'avocats  du  meme 
age? 


1 
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Bases  du  BASIC 

Pratiquement  tous  les  micro-ordinateurs  familiaux  utilisent  le  langage  appele  BASIC.  II 
est  maintenant  passe  au  rang  de  langage  performant  destine  a  la  conception  de  program- 
mes d'une  puissance  et  d'une  complexite  extreme. 

Son  nom  reste  toutefois  synonyme  de  facilite  et  guide  les  debutants"  de  I'informatique  per- 

sonnelle  du  simple  programme  a  des  applications  de  statistiques  elaborees. 

Le  BASIC  est  un  langage  interactif  qui  interprete  un  certain  nombre  de  commandes  bien 
definies  puis  effectue  divers  traitements  sur  les  donnees  qui  lui  sont  fournies.  Contraire- 
ment  aux  Iangages  humains  disposant  de  5000  a  8000  mots,  BASIC  se  debrouille  avec 
environ  200  mots.  Les  programmes  ecrits  en  BASIC  doivent  obeir  a  des  regies  simples  et 
rigides  et  respecter  une  syntaxe  precise,  implacablement  sanctionnee  par  le  message : 

Syntax  error 

Ce  n'est  pas  aussi  contraignant  qu'il  le  semblerait  tout  d'abord  -  un  simple  moyen  d'indi- 
quer  que  1'ordinatcur  ne  comprend  pas  ce  que  vous  voulez  dire  (bien  souvent  par  la  faute 
d'une  virgule  ou  de  guillemets  mal  places,  ou  encore  d'un  O  confondu  a  un  0  (zero)). 

Les  ordinateurs  sont  des  machines  ne  demandant  qua  vous  servir,  pour  peu  que  vous 
compreniez  et  respectiez  leurs  imperatifs  de  fonctionncment.  Cc  sont  avant  tout  des 
machines  a  calculer.  pourvues.  il  est  vrai,  d'operateurs  sophistiques  depassant  le  stade  de 

la  simple  operation  arithmetique,  mais  conservant  encore  la  rigidite  inherente  au  traite- 
ment  numerique. 

Des  chiffres  s'il  vous  plait... 

Si  vous  aviez  les  oeuvres  completes  de  Victor  Hugo  sur  un  ordinateur.  vous  ne  trouverez 
pas  une  seule  lettre  ou  un  seul  mot  dans  le  systeme  :  toute  donnee.  tout  renseignement  est 
d'abord  transforme  en  chiffres  et  en  nombres  avant  que  l'ordinateur  ne  soit  capable  de 

les  manipuler. 

Le  BASIC  interprete  les  mots  comme  des  chiffres  arm  que  l'ordinateur  puisse  les  traiter 
a  l'aide  d'additions.  de  soustractions  ou  d'operations  booleennes.  II  est  aussi  a  meme  de 
comparer  ces  donnees  (tables  de  verite,  oui-non,  etc.).  de  verifier  que  deux  conditions  sont 
remplics  en  meme  temps  (et,  ou  inclusif,  ou  exclusif),  etc. 

Grace  au  programme,  l'ordinateur  divise  toute  tache  en  une  infinite  d'operations  «  oui- 


non  ». 


Un  ordinateur  ne  sail  meme  pas  multiplier  directement :  pour  multiplier  35  par  10,  il 
ajoute  35  dix  fois  de  suite. 
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Si  cc  procede  vous  semble  complique  vous  n'avez  pas  tout  a  fait  tort.  Vous  venez  meme 
de  decouvrir  unedes  verites  premieres  de  !a  programmation.  L'ordinateurest  simplement 
une  machine  accomplissant  des  taches  repetitives  extremement  vite  et  avec  une  precision 
absolue.  Le  procede  qui  consiste  a  traiter  des  donnees  0  ou  1  est  souvent  appele  numeri- 
que,  par  opposition  au  traitement  analogique,  jouant  sur  la  variation  continue  du  signal 
electronique. 

Mais  dans  un  monde  reduit  aux  deux  chiffres,  0  et  1,  comment  allons-nous  compter  ? 


rsli^li^ 
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Bits  et  octets 


Nous  sommes  habitues  au  systeme  decimal,  ou  systeme  a  base  10,  qui  utilise  10  chiffres 
de  0  a  9.  Le  systeme  qui  utilise  les  2  chiffres  0  et  1  s'appelle  le  systeme  binaire  et  les  unites 
qui  le  composent  sont  des  BITS  (pour  Binary  diglTS). 

7  =  001 II  en  binaire 

Pour  convertir  un  nombre  decimal  en  nombre  binaire  (nombre  en  base  2)  il  faut  partir 

des  puissances  de  2. 

2°  =  1 

21  =  2  =  2  =  2(2°) 

22  =  4  =  2x2  =  2(2') 

23  =  8  =  2x2x2  =  2(22) 

24  =  16  =  2x2x2x2  =  2(23) 

...et  ainsi  de  suite : 

24  23  22  21  2° 

1  0  0  1  t  -  ■ : 

{16    +      0      +      0      +      2      +      1)     =     19 


In* 
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Pour  pouvoir  utiliser  Ies  bits,  on  Ies  groupe  par  ensembles  de  8,  que  Ton  appelle  octets. 
Le  plus  grand  nombre  qu'on  puisse  ecrire  avec  un  octet  est  11111111  (binaire)  =  255 
(decimal),  soit  256  combinaisons  (00000000  compris)  de  0  et  de  1. 

Les  ordinateurs  manipulent  Ies  nombres  par  multiples  de  huit  bits.  256  n'etant  pas  un 
nombre  tres  grand,  les  manipulations  sont  effectuees  au  moyen  de  2  octets  disposes  en 
matrice.  Une  adresse  verticale  et  une  adresse  horizontale  permettant  de  positionner  cha- 
que  element  de  la  matrice. 


0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

0 

1 

2 

3 

4 

5 

1 

1 

6 

7 

8 

9 

Cette  matrice  peut  placer  (10x10)  elements,  les  elements  dotes  de  1  etant  reconnus  comme 
5,3  et  5,5. 

Une  matrice  binaire  256x256  peut  ainsi  manipuler  65536  elements  differents  en  utilisant 
un  octet  pour  l'adresse  verticale  et  un  octet  pour  Padresse  horizontale. 
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Pour  raccourcir,  on  utilise  le  Kilo  octet  (K  ou  KO)  qui  est  fcgal  a  1024  octets  (le  kilo  ne 
valant  pas  1000  en  informatique).  Voila  pourquoi  un  ordmateur  comme  le  CFC6M, 
consider*  comme  un  64K  dispose  en  fait  de  65536  octets  (64  x  1024)  de  memoire. 

Heureusement,  lc  BASIC  opere  lcs  conversions  pour  vous  et  vous  pourrez  devenir  un  tres 

bon  programmeur  sans  trop  connaitre  le  binaire.  Cela  vous  aidera  toutefois  a  compren- 
dre  pourquoi  certains  nombres  ont  plus  d'importance  que  d'autres  en  informatique. 

Cependant... 

Bien  que  simple  et  elegant,  le  systeme  binaire  est  difficile  a  lire  car  ses  nombres  ont  ten- 
dance a  s'allonger  et  a  ne  plus  sauter  aux  yeux. 

On  a  done  choisi  de  recourir  a  un  systeme  de  notation  en  base  16,  comme  puissance  de  2 
capable  de  traduire  les  nombres  binaires  d'une  maniere  plus  concise.  On  1  appelle  le  sys- 
teme hexadecimal,  HEX  pour  les  intimes. 


Decimal 

0  1  2  3  4  5  6  7  8  9  10  1 1  12  13  14  15  - "~-~ 

HEX 

01  23456789ABCDEF 

Le  systeme  hexadecimal  peut  decomposer  les  8  bits  d'un  octet  en  deux  blocs  de  quatre 
bits,  15  s'exprimant  par  un  nombre  a  quatre  bits  :  1 1 1 1  en  bmaire. 
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Considerons  la  table  avec  les  notations  binaire,  decimal  et  hexadecimal 


Decimal 

Binaire 

Hexadecimal 

0 

0 

0 

1 

1 

1 

2 

10 

2 

3 

11 

3 

4 

100 

4 

5 

101 

5 

6 

110 

6 

7 

111 

7 

8 

1000 

8 

9 

1001 

9 

10 

1010 

A 

11 

1011 

B 

12 

1100 

C 

13 

1101 

D 

14 

1110 

E 

15 

mi 

F 

16 

10000 

10 

Un  nombre  a  8  bits  peut  etre  decompose  en  deux  nombres  de  4  bits  (appeles  nibbles  en 
anglais,  ce  qu'on  peut  traduire  par  petite  bouchee...). 

Dans  ce  livre,  les  nombres  hexadecimaux  sont  designes  par  le  symbole  &,  &D6  par  exem- 
ple,  et  servent  aux  programmeurs  qui  utilisent  le  langage  assembleur,  a  mi-chemin  entre 
le  langage  machine  et  le  BASIC. 

Pour  converter  de  I'hexadecimat,  vous  devez  faire  attention  a  multiplier  le  premier  chiffire 
par  16  et  lui  ajouter  le  deuxieme.  Ainsi  &D6  donne  (I3xl6)  +  6  =  214  et  non  pas  13  et  6 
ou  136,  comme  on  serait  tente  de  le  faire. 

C'est  le  meme  procede  que  celui  du  systeme  decimal,  a  ceci  pres  qu'il  est  plus  facile  de 
multiplier  par  10  que  par  16  ! 
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Si  vous  avez  tout  compris  jusque  la,  bravo,  vous  saurez  rapidement  maftriser  le  CPC664 
pour  produire  quantite  de  programmes.  Si  cela  vous  parait  complique,  consultez  un  hvre 
d'initiation  qui  vous  expliquera  plus  en  detail  ce  que  nous  ne  pouvons  qu'effleurer  dans 
ce  livre. 
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Partie  2 : 

Fonctions  propres  au  6128 


Cette  partie  appro fondtt  certains  aspects  propres  au  6128.  Le  Cours  Ele- 
mentaire  et  le  chapitre  « Liste  complete  des  mots  cles  du  BASIC 
AMSTRAD  6128  »  vous  foumiront  toutes  les  informations  dc  base  dont 
vous  pouvez  avoir  besoin. 

Sujets  abordes 

*  Jeu  de  caracteres  \\  V\  L 

*  ascii  *>■  ■:'. ..>■■■'"■;-,, 

*  Variables 

*  Logique  •■ 

*  Caracteres  dermis  par  1'utilisateur 

*  Formatage  de  PRINT 

*  Fenetres 

*  Interruptions 

*  Donnees 

*  Sons 

*  Graphiques 

*  Materiel 

*  Graphiques  exploitant  la  memoire  supplemental  re 

Parlons  un  peu  de  caractere 

Lorsque  vous  tapez  sur  le  clavier  de  votre  6128,  ne  vous  fiez  pas  aux  lettres  et  nombres 
que  vous  voyez  s'afficher  a  l'ecran.  Comme "nous  1'avons  deja  dit,  votre  ordinateur  n'est 
pas  une  machine  a  ecrire.  Ce  qui  apparait  n'cst  que  le  resultat  d'une  combinaison  de 
contacts  electriques  declenches  par  la  pression  des  touches.  Les  signaux  electriques 
declenches  par  cette  action  sur  les  touches  sont  traduits,  dans  les  circuits  internes  de  1'or- 
dinateur,  arm  de  produire  a  l'ecran  certains  motifs  de  points.  Ces  motifs  forment  des 
lettres.  des  nombres  ou  des  sym boles  propres  au  jeu  de  caracteres  du  6128. 
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Certains  caracteres  affiches  ne  sont  pas  directement  accessibles  par  les  touches  du  clavier 
mais  peuvent  etre  visualises  au  moyen  de  l'instruction  PRINT  CHR$ (<nombre>).  Les 
elements  stockes  dans  1'ordinateur  se  presentent  tous  sous  forme  d'octets  offrant,  corarae 
nous  venons  de  le  voir  dans  la  partie  1  de  ce  chapitre,  256  combinaisons  de  valeurs  possi- 
bles. L'ordinateur  devant  faire  appel  a  au  moins  un  octet  pour  chaque  caractere  stocke 
dans  sa  memoire  (que  vous  le  vouliez  ou  non,  c'est  la  plus  petite  unite  geree  par  le 
6128)  les  256  possibility  ainsi  disponibles  depassent  largement  les  96  caracteres,  dits 
standard,  d'une  machine  a  ecrire.  menageant  ainsi  160  octets  supplementaires  dont  il 
serait  stupide  de  ne  pas  tirer  parti. 

L'ensemble  des  caracteres  «  standard  »  s'appelle  un  «  sous-jeu  ».  Dans  le  monde  de  1'in- 
formatique,  il  s'inscrit  dans  la  categorie  du  systeme  d'affichage  «  ASCII »,  acronyme 
d'American  Standard  Code  for  Information  Interchange.  A  l'origine,  ce  systeme  assurait 
la  transmission  de  donnees  d'un  ordinateur  a  l'autre  sous  une  forme  que  les  systemes 
reconnaissent.  Vous  trouverez  dans  le  chapitre  «  Pour  information...  » la  liste  des  caracte- 
res ASCII  ainsi  que  les  caracteres  supplementaires  du  6128  accompagnes  des  codes  nume- 
riques  correspondant. 


Comment  en  arriver  la... 

Au  point  ou  nous  en  sommes,  le  programme  d'affichage  du  jeu  de  caracteres  : 

10  FOR  n=32  to  255 

20  PRINT  CHR*(n); 
30  NEXT 

...n'a  certainement  plus  de  secrets  pour  vous.  Decortiquons-le  maintenant : 

Nousconstatons  tout  d'abord  qu'au  lieu  d'ordonner  PRINT  «  abcdefghi]klmn...etc  », 
nous  avons  entre  PRINT  CHR${n).  n  etant  une  representation  pratique  de  «  variable  ». 
Une  variable  est  un  element  d'information  qui  «  varie  »  selon  les  instructions  du  pro- 
gramme. (Le  choix  de  n  pour  variable  est  tout  a  fait  arbitraire,  nous  aurions  pu  prendre 
n'importe  quelle  combinaison  de  lettres,  pourvu  qu'elle  soit  differente  d'un  mot  cle). 

Comment  reconnaitre  une  variable  ? 

Le  chiffre  5  est  fixe,  il  est  compris  entre  4  et  6 ;  il  n'est  done  pas  une  variable.  Le  caractere 

n  est  egalement  fixe,  c'est  une  Iettre  de  Palphabet. 
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Comment  1'ordinateur  peut-il  done  faire  la  difference  ?  Si  la  leltre  n  avait  ete  declaree 
comme  caractere  alphabetique,  die  aurait  ete  tapee  entre  guillemets  "  n  ",  et  I'ordina- 
teur,  incapable  de  comprendre  ia  sequence  FOR  "  r»  "  =  32  TO  255,  aurait  repondu  par 
le  message  Syntax  error. 

En  tapant  n  sans  guillemets,  nous  avons  indique  a  1'ordinateur  qu'il  s'agissait  d'une  varia- 
ble. En  BASIC,  une  commande  FOR  doit  etre  suivie  d'une  variable  ;  1'ordinateur  rejette 
done  tout  que  ce  qui  en  differe. 

Nous  venons  d'indiquer  a  1'ordinateur  que  n  =  32  TO  255,  defmissant  ainsi  les  valeurs 
possibles  pour  la  variable.  En  fait,  il  s'agit  d'une  sequence  commencant  a  32  et  finissant 
a  255. 

Apres  avoir  declare  cette  variable,  nous  devons  alors  indiquer  a  1'ordinateur  ce  qu'il  doit 
en  faire  ;  e'est  justement  le  role  de  la  ligne  20  : 

20  PRINT   CHR«(n); 

Quelle  que  soit  la  valeur  de  n,  1'ordinateur  doit  rechercher  dans  sa  memoire  le  caractere 
correspondant,  afin  de  Pafficher  a  l'ecran. 

Le  point-virgule  terminant  la  ligne  20  indique  a  1'ordinateur  qu'il  ne  doit  effectuer  ni 
retour  chariot  ni  de  saut  de  ligne.  (Car  chaque  caractere  serait  affiche  en  premiere  colonne 
d'une  nouvclle  ligne.) 

La  ligne  30  lui  commande  de  revenir  a  la  ligne  contenant  FOR,  apres  avoir  opere  sur  la 
premiere  valeur  de  n  (a  savoir  32).  et  d'effectuer  la  meme  operation  pour  la  valeur  sui- 
vante  (NEXT)  de  la  variable  n.  Ce  procede,  que  1'on  appelle  «boucle»,  est  I'un  des 
concepts  primordiaux  de  Ia  programmation.  II  vousevite  de  retapcr  de  longues  sequences 
d'instructions  et  vous  apprendrez  tres  vite  a  vous  en  servir  dans  vos  programmes. 

Lorsque  la  boucle  FOR  NEXT  atteint  la  derniere  valeur  de  la  fourchette  declaree  (255), 
cette  operation  s'arrete  et  1'ordinateur  chcrche  la  ligne  suivant  la  ligne  30.  Comme  il  n'y 
en  a  pas,  le  programme  cesse  et  rcvicnt  au  mode  direct  avec  affichage  du  message  Ready, 
signalant  ainsi  qu'il  est  pret  a  recevoir  de  nouvelles  instructions.  Vous  pouvez  alors,  si 
vous  le  desirez,  entrer  RUN  une  nouvelle  fois  pour  repeter  l'execution  du  programme. 
Ce  dernier  est  stocke  dans  une  partie  de  la  memoire  ou  il  restera  tant  que  vous  ne  donnez 
pas  lordre  de  le  retirer  et  tant  que  1'ordinateur  reste  sous  tension. 

Ce  programme  est  nilustration  parfaite  d'un  aspect  fbndamental  de  Pinformatique :  tout 
ce  que  fait  1'ordinateur  se  rapporte  a  des  nombres.  Ii  a  affiche  Palphabet  et  tout  un  ensem- 
ble de  caracteres  par  le  biais  de  leur  reference  numerique.  Lorsque  vous  appuyez  sur  la 
touche  A,  vous  ne  demandez  pas  1'affichage  du  A  mais  vous  invitez  1'ordinateur  a 
rechercher  dans  sa  memoire  I'information  numerique  correspondant  a  1'affichage  du  A 
sur  l'ecran.  L'emplacement  de  cette  information  est  defini  par  un  code  numerique  mis  en 
ceuvre  par  l'actionnement  de  la  touche  du  clavier. 
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Chaque  caractere  correspond  a  un  nombre.  Vous  trouverez  une  liste  de  references  dans 
la  partie  3  du  chapitre  «  Pour  information... ». 

De  meme,  l'affichage  des  caracteres  a  I'ecran  n'a  rien  a  voir  avec  l'ecriture  telle  que  vous 

la  connaissez  :  la  encore,  il  s'agit  de  nombres. 

Ainsi,  en  code  ASCII  la  lettre  A  correspond  a  97.  Mais  l'ordinateur  ne  comprend  pas  ce 
nombre  (il  n'est  pas  tres  fute) ;  97  doit  d'abord  etre  converti  du  code  decimal  en  un  code 
que  l'ordinateur  puisse  reconnaitre,  c'est-a-dire  en  code  (tangage  ???)  machine  (dont  les 
principes  sous-jacents  sont  abordes  prteedemment  dans  ce  chapitre). 

A  premiere  vue,  la  conversion  des  nombres  decimaux  en  notation  hexadecimale  peut  sem- 
bler  laborieuse.  Nous  sommes  tellement  habitues  a  compter  en  base  10.  qu'en  changer 
nous  parait  aussi  farfelu  que  d'inverser  la  disposition  du  couteau  et  de  la  fourchette  sur 
une  table ! 

L'assimilation  de  la  notation  hexadecimale  exige  une  petite  gymnastique  intellectuelle 
qui,  apres  que  vous  1'aurez  maitriste,  vous  ouvrira  la  porte  sur  un  grand  nombre  de 

notions  in  forma  tiques. 

Si  les  systemes  de  numeration  binaire  et  hexadecimale  restent  flous  pour  vous,  nous  vous 
conseillons  de  lire  ou  de  relire  attentivement  la  premiere  partie  de  ce  chapitre. 

Une  fois  que  l'ordinateur  a  traduit  1 'activation  de  la  touche  A  par  une  serie  de  nombres 
qu'il  comprend,  il  recherche  la  partie  de  la  memoire  indiquee  afin  d'obtenir  une  autre  serie 
de  nombres  definissant  a  leur  tour  le  caractere  a  I'ecran.  La  lettre  que  vous  voyez  apparai- 
tre  est  done  constitute  d'un  bloc  de  donnees  stocke  en  memoire  sous  forme  de  «  matrice  » 
numerique : 


MATRICE  GRILLE       a  MINUSCULE      A  MAJUSCULE 

La  matrice  se  compose  de  lignes  et  de  colonnes  de  points.  Le  caractere  s'affiche  par  activa- 
tion ou  deactivation  de  la  sequence  de  points  requise,  chaque  point  etant  determine  par 
des  donnees  stockees  dans  le  memoire  dc  l'ordinateur.  Dans  le  cas  du  6128,  les  matri- 
ces ou  «  cellules  »  de  Pecran  sont  constitutes  de  8  lignes  sur  8  colonnes.  Si  le  caractere  que 
vous  desirez  afficher  n'existe  pas  parmi  les  255  disponibles,  vous  pouvez  le  definir  a  1'aide 
du  mot  cle  SYMBOL,  decrit  dans  une  partie  ulterieure  de  ce  chapitre. 


A  vos  heures  de  loisir. 
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PRINT    10    AND    1080  va'tlblW 

Resultat  8  aussi ! 

Ceci  est  du  au  fait  que  1 0  et  1 00©  ont  ete  convertis  en  leur  equivalent  binaire.  Droles 
de  mathematiques,  mais  rappelez-vous  que  les  operateurs  logiques  ne  connaissent  que  le 
systeme  binaire  0  et  1,  vrai  ou  faux. 

Explication : 

10  en  binaire  1010 

1000  en  binaire  1111101000 

L'operateur  AND  verifie  les  1  se  trouvant  en  mftme  position  dans  les  deux  nombres  et 

trouve : 

0000001000 

...qui  en  systeme  decimal  est  egal  a  8.  L'operateur  logique  AND  (=et)  verifie  si  deux 
conditions  sont  vraies  en  meme  temps.  Voici  un  petit  programme  explicatif : 

10  INPUT  "Aujourd'hui  nous  sammes  le"ijour 

20  INPUT  "Buel  est  le  numero  du  mois";mois 

30  IF  jour=25  AND  mais=12  THEN  50 

40  CLSsSOTO  IB 

50  PRINT"Joyeux  Noel  ! " 

OR  opere  egalement  par  bits,  donnant  1  dans  tous  les  cas  ou  les  deux  bits  des  arguments 
different  de  0,  auquel  cas  le  resultat  est  egal  a  0.  Avec  les  memes  nombres  que  dans 
Pexemple  AND  : 

PRINT  1000  OR  10 
1002 

En  binaire:  1010 

1 111101000 

Resultat:       1111101010 

Dans  un  programme : 

10  CLS 

20  INPUT  "Quel  est  le  nunero  du  mois"sffloi5 

38  If  ma  is" 12  OR  mais=l  OR  mois=2  THEN  50 

40  SOTO  10 

50  PRINT"Nous  devrions  etre  en  Hiver  !" 
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L'operateur  NOT  inverse  chaque  bit  de  Pargument  (0  devient  1  et  inversement) : 

10  CLS 

20  INPUT  "Quel  est  le  numero  du  mois";(«ois 

32  IF   NOT    Uoi<s*i   OR   mais=7   OR  mois=8)  THEN   50 
40   GOTO    10 

50  PRINT"Nou5  ne  pouvons  etre  en  Ete  !" 

On  peut  aussi  melanger  autant  d'operateurs  logiques  qu'on  ie  desire  (dans  la  limite  d'une 
ligne)  pour  donner,  par  exemple  : 

10   INPUT  "Aujourd'hui  nous  soames  le";jour 
20    INPUT    "Quel    est    le  numero  du  mois";moi5 

33  IF   NOT    (    mois=12   OR    diois  =  l)    AND    jour  =  29    THEN    50 
40  CLS:S0T0    10 

50  PRINT"Ce  n'est   ni    Deceitibre  ni    Janvier     nais       c'est  peut- 
etre  une  annee  bissextile* 

Le  resultat  d'une  expression  relationnelle  est  soit  -1,  soit  0.  La  representation  binaire 
de  -1  donne  une  configuration  binaire  dont  tous  les  bit  valent  1,  et  celle  de  0  en  donne 
une  dont  tous  les  bits  valent  0.  Le  resultat  d'une  operation  logique  sur  de  tels  arguments 
donnera  -1  pour  vrai  et  0  pour  faux. 

Ajoutons  deux  Iignes  pour  compliquer  : 

60  PRINT  N0T((nois=12  OR  «nois=l  > 
70  PRINT  (mois=12  OR  mois=i! 

Si  vous  lancez  Ie  programme  avec  29  pour  le  jour  et  2  pour  le  mois,  vous  obtenez  la 
reponse  de  la  ligne  50  et  les  valeurs  produites  par  les  expressions  des  Iignes  60  et  70. 

Pour  finir,  XOR  (OU  eXcIusif)  donne  un  resultat  vrai  si  les  deux  arguments  sont 
differents. 

Resumons  par  un  tableau  susceptible  de  donner  une  idee  plus  claire  de  la  situation.  Ce 

type  de  representation  est  appele  table  de  verite  d'une  fonction. 

ARGUMENT  A  1010 

ARGUMENT  B  0110 

Resultat  AND  (et)  0010 

Resultat  OR  (ou)  1110 

Resultat  XOR  (ou  exclusif)  1 100 
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Caracteres  definis  par  l'utilisateur 

Une  des  premieres  applications  de  nombres  binaires  que  vous  etes  susceptibles  de  ren- 
contrer  concerne  la  determination  de  caracteres  a  l'aide  de  la  commande  SYMBOL.  Si 
le  caractere  est  dessine  sur  une  grille  de  8  sur  8,  chaque  case  de  la  grille  est  alors  convertie 
en  chiffre  binaire  ;  1  correspondant  a  une  case  encree  et  0  a  une  case  sans  encre,  c'est-a- 
dire  de  la  couleur  du  fond.  Les  huit  nombres  sont  ensuite  passes  comme  parametres  de  la 
commande  SYMBOL.  Pour  dessiner  une  maison,  par  exemple  : 

t  =  00001020  =  408  =  8*8 

tttt  =  00111100  =  43C  =  32  +  16  +  8  +  4     =  60 

t     *  ~   81000010  =  442  *  64          +2   =  66 

I  *   *  *  =  10100101  =  4A5  =  128    +32     +4   +  =  65 

t      *  =  10000001  =  Sc8 1  =  128              +  'a  12? 

t  U  *  *  =  10110101  =  4B5  =  128   +32+16  +4   +1=  181 

I  it    *  =  10110801  =  4-61  =  128   +32+16      +1=  1/7 

idUiU  =  11111111  =  fcFF  =  128+64+32+16+8+4+2+1=  255 

...la  commande  est  celle-ci : 

SYMBOL   240,8,60,66,165,129,181,177,255 
...ou  : 

SYMBOL   240,40e,43Cf442,4A5,481,St65,&Bl,4FF 

...ou  bien : 

SYMBOL  240,4X00081000,4X00111100,4X01000010,4X10100101 
8.X  1000000 1,4X181 10101,4X10110001,4X11  111  111 

Pour  afficher  le  caractere  defini,  vous  devez  entrcr : 

PRINT   CHR*(240I 
Et  enfin,  pour  grouper  piusieurs  blocs  de  caracteres  il  vous  suffira  de  specifier : 

semi$=CHR*(240!+CHR$<240) 
PRINT  semi* 

...ou : 

terrasse*=string*(15,248> 
PRINT  terrasse$ 

Lancez  les  rotatives ! 

P  R I  NT  est  une  des  premieres  commandes  que  vous  utilisez  lorsque  vous  debutez  en  infor- 
matique.  Elle  fait  partie  des  commandes  du  BASIC  dont  le  nom  indique  reellement  la 
fonction...en  apparence.  En  fait,  PRINT  suppose  beaucoup  plus  de  choses  qu'il  n'en 
parait :  ou  placer  1'afnchage  ?  De  quelle  maniere  ? 
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Format  de  PRINT  s,«j^t; 

La  commande  PRINT  peut  s'utiliser  de  plusieurs  facons,  la  manicre  la  plus  simple  etant 
de  la  faire  suivre  de  1'element  a  afficher  ou  imprimer :  un  nombre,  une  chaine  ou  un  nom 
de  variable. 

PRINT    3 

3 

PRINT  "bonjour" 
bonjour 

a=5 

PRINT  a 
5 

a$="test" 

PRINT  a$ 
test 

L'instruction  PRINT  peut  coritenir  plusieurs  elements  intercales  d'un  separateur,  TAB 
ou  SPC.  Les  virgules  et  les  points-virgules  sont  des  separateurs.  Le  point-virgule  permet 
l'affichage  aligne  des  elements  et  la  virgule  provoque  le  decalage  de  I'affichage  sur  la  zone 
suivante.  Bien  que  la  largeur  initiale  d'une  zone  soit  de  treize  caracteres,  vous  pouvez  la 
modifier  a  I'aide  de  la  commande  ZON  E. 

PRINT   3;-4;S 
3-4    5 

PRINT  "bonjour  "; "Monsieur " 
bonjour  Monsieur 

PRINT  "bonjour  ",  "Monsieur" 
bonjour        Monsieur 


PRINT  3,-4,5 
3  -4  5 

ZONE  4  '■ 

PRINT  3,-4,5 
3-4    5 

Les  nombres  positifs  sont  precedes  d'un  espace  et  les  nombre  negatifs  du  signe  moins.  II 
sont  tous  suivis  d'un  espace.  Les  chaines  s'affichent  exactement  telles  qu'elles  apparais- 
sent  dans  les  guillemets. 
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La  fonction  SPC  accepte  un  parametre  numerique  definissant  le  nombre  d'espaces  a 
afficher.  Pour  Ies  valeurs  negatives  le  nombre  pris  en  compte  est  zero,  si  la  valeur  est  supe- 
rieure  a  la  largeur  dc  la  fenetre,  c'est  la  largeur  de  la  fenetre  qui  est  alors  prise  en  compte. 


PRINT  SPC(5)  "coucou" 
coucou 


X=3 

PRINT  SPC(xt3l "coucou" 

CQUCOU 


TAB  fonctionne  de  maniere  identique,  mais  affiche  le  nombre  d'espaces  requis  de  facon 
a  ce  que  l'element  a  afficher  apparaisse  a  la  colonne  spectfiee. 

Le  canal  ou  apparaissent  toutes  les  donnees  en  sortie  est  la  fenetre  0,  a  moins  qu'un  sped- 

ficateur  de  canal  (U)  ne  precede  la  Iiste  d'elements  a  afficher.  Vous  pouvez  utilisez  d'autres 
canaux  pour  la  sortie  sur  d'autres  fenetres.  Les  canaux  8  et  9  sont  particuliers  :  le  canal  8 
correspond  a  une  imprimante  et  le  canal  9  achemine  les  donnees  sur  un  fichier  de  dis- 
quette  (ou  de  cassette).  Dans  ces  cas-la,  la  commande  WRITE  est  toutefois  preferable  a 
PRINT. 


PRINT    "b  on  jour"  .  fenetre  0 
bonjour 

PRINT  #0,  "bonjour"  -  fenetre 0 aussi 
bonjour 

PRINT  #4, "bonjour"  -fenetre4 

b on  j  our  (En  haut  de  1'ecran) 


PRINT  #8,  "bonjour"  -  sur  Timprimante 

bonjour  (Le  cas  echeant) 


Bien  que  TAB  et  SPC  conviennent  parfaitement  aux  formats  d'affichage  simples,  une 
visualisation  plus  detaillee  des  informations  demandera  l'utilisation  de  la  commande 
PRINT  USING,  accompagnee  du  modele  de  format  adequat.  Un  modele  de  format  est 
une  chaine  contenant  des  caracteres  speciaux,  specifiant  chacun  un  type  de  format  parti- 
cular. Ces  caracteres,  appeles  «  specificateurs  de  format  de  zone  »  font  1'objet  d'une 
approchc  plus  detaillee  dans  la  description  du  mot  cle  PRINT  USING,  (precedemment 
dans  cet  ouvrage).  Les  quelques  exemples  suivants  vous  apporteront  cependant  des  eclair- 
cissements  sur  le  sujet. 

Pour  commencer,  voici  les  formats  destines  a  l'affichage  des  chames  : 
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PRINT  USING  "\      \"f "t»st  de  chaine" 
test  d 


" !  "  sert  a  afficher  le  premier  caractere  d'une  chaine. 

PRINT  USING  "i "5 "test  de  chaine" 
t 

Le  format  le  plus  utile  pour  les  chaines  est  encore  "  &  ".  II  empeche  Faffichage  d'une 
chaine  sur  une  nouvelle  ligne.  En  effet,  lorsqu'une  chaine  ne  tient  pas  sur  la  ligne  en  cours, 
le  BASIC  la  reporte  par  defaut  sur  une  nouvelle  ligne.  PRINT  USING  "  &";permetde 
passer  outre. 

(Utilisez  BORDER  0  pour  visualiser  les  bords  du  papier.) 

MODE  istOCATE  39, liPRINT  "trop  longue" 

-ligne  1 
trop  longue  -ligne  2 

node  1:  locate  39,  liPRINT  USING  "Se'V'trop  longue" 

tro       -ligne  1 
p  longue  -ligne  2 

Pour  Faffichage  de  nombres,  vous  disposez  de  multiples  modeles.  Le  plus  simple  etant 
PRINT  USING     ###§#   ,  ou  chaque  #  correspond  a  un  chiffre. 

PRINT  USING  " ♦*###*»" ;  123 
123 

Vous  pouvez  introduire  le  point  decimal  a  l'aide  de  "  •  ". 

PRINT  USING  "####.####*"; 12.45 
12,45800 

Les  chiffres  avant  le  point  decimal  peuvent  etre  regroupes  par  trois  et  separes  par  des 

virgules.  11  faut  alors  faire  appel  a  "  ,  "  dans  le  modele  avant  le  point  decimal. 

PRINT  USING  "#*«#«**», .H*#";i23456,7B 
123,456.7800 
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«  $$  »  et «  FF  »  permettent  d'inclure  des  signes  de  monnaie  flottants  affichcs  avant  le  pre- 
mier chiffre  du  nombre  meme  s'il  ne  remplit  pas  le  format  entier. 

PRINT  USING  "$$##";7 
$7 

PRINT  USING  "$*##"?351  v-  ■7!?V:.~r  ■->..  ■ 

$351 

PRINT  USING  "F##*#, . ##" ; 1234.567 
F I, 234. 57 


Vous  remarquez  que  le  resultat  est  arrondi. 

"  **  "  dans  le  modele  remplace  les  blancs  precedant  le  nombre  par  des  asterisques. 

PRINT  USING  "**####. #";12. 22 
*U*12.2 

Vous  pouvez  combiner  les  asterisques  aux  symboles  monetaires : "  ***...  etc  "  ou  "  "F,... 
etc  ". 

Le  signe  "  +  "  au  debut  du  modele  de  format  demande  le  placement  du  signe  du  resultat, 
avant  le  premier  chiffre.  S'il  figure  a  la  fin  du  modele,  le  signe  est  place  apres  le  resultat. 

Le  signe  "  -  "  ne  peut  se  trouver  qu'a  la  fin  du  modele  de  format  pour  qu'apparaisse  un 
signe  moins  apres  les  nombres  negatifs. 

PRINT  USING  "+##";12 
+  12 

PRINT  USING  "+##":-12 
-12 

PRINT  USING  "#«+"; 12 

12  + 

PRINT  .USING  "#*-";-12 
12" 

PRINT  USING  "##-";  12  '"~:'~"  "" 

12 
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Pour  exprimer  un  nombre  sous  forme  exponentielle,  vous  pouvez  utiliser  «  t  T  T  T  *  dans 
Ie  modele, 

PRINT  USING  B###.»#mt"jl23.45 
12.35E+0I 

Lorsque  vous  utitisez  des  modeles  de  format,  le  symboie  %  apparait  devant  le  resultat  si 
le  nombre  depasse  le  modele  specifie  (afin  d'indiquer  que  le  resultat  n'a  pas  ete  raccourci 
pour  satisfaire  au  modele). 

PRINT  USING  "#»##"j 123456 
7.123456 


A  vos  fenetres ! 

Le  BASIC  du  6128  permet  de  definir  jusqu'a  huit  fenetres  de  texte.  Toutes  les  com- 
mandes  d'acheminement  du  texte  vers  l'ecran  peut  servir  a  envoyer  Taffichage  sur  i'une 
de  ces  fenetres. 

La  commande  de  definition  d'une  fenetre  s'intitule  tout  naturellement  WINDOW.  Elle 
est  suivie  de  5  valeurs.  La  premiere,  facultative,  specifie  la  fenetre  desiree  (la  fenetreO  par 
defaut).  Tous  les  messages  du  BASIC  (Ready  par  exemple)  s'affichent  dans  la  fenetreO. 
Precedant  ce  chifire,  le  symboie  diese  (#)  1'identine  en  tant  que  specificateur  de  canal.  Les 
quatre  parametres  restant  correspondent  aux  limites  gauche,  droite.  superieure  et  infe- 
rieure  de  la  fenetre.  Ces  valeurs  definissent  les  limites  en  termes  de  lignes  et  colonnes 
d'ecran  et  doivent  done  etre  comprises  entre  1  et  80  dans  ie  sens  horizontal  et  entre  I  et 
25  pour  la  verticale. 

L'exemple  suivant  definit  une  fenetre  4  allant  de  la  colonne  7  a  la  colonne  31,  et  de  la 

ligne  6  a  la  ligne  18.  Reinitialisez  votre  ordinateur  et  tapez  : 

WINDOW    #4,7,31,6, IB    ' 
Rten  ne  s'affiche  apres  1'entree  de  cette  commande,  mais  si  vous  tapez  : 

INK  3,9 
PAPER  #4,3 
CLS  #4 

...un  grand  rectangle  vert  apparait  a  l'ecran  definissant  la  fenetre  4.  L'exemple  ci-dessus 
montre  que  introduction  du  numero  de  canal  permet  d'utiliser  PAPER  ct  CLS  avec  cha- 
cune  des  huit  fenetres.  La  commande  agit  par  defaut  sur  la  fenetreO. 
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Toutes  les  commandes  ci-dessous  peuvent  etre  accompagnees  d'un  specificateur  de  canal 

identifiant  la  fenetre  sur  laquelle  dies  vont  agir. 

CLS 

COPYCHR* 
INPUT 
LINE  INPUT 

LIST 
LOCATE 

PAPER  

PEN 

POS 

PRINT 

TA6 

TAGOFF 

VPOS 

WINDOW 

WRITE 


La  fenetre  verte  que  vous  venez  de  creer  a  obscurei  une  partie  du  texte  deja  affichee  (sur 
la  fenetreO). 

Le  texte  peut  etre  dirige  vers  une  fenetre  donnee  en  integrant  un  specificateur  de  canal 
dans  la  commande  PRINT. 

PRINT   #4, "coucou" 

Ces  mots  apparaitront  en  haut  du  rectangle  vert  au  lieu  de  s'afficher  sur  la  ligne  suivante 
comme  Iors  de  l'entree  de  : 

PRINT    "coucou" 

Vous  constatez  qu'une  partie  de  la  fenetre  verte  a  ete  recouverte  par  le  texte. 

Si  vous  desirez  voir  tous  les  messages  du  BASIC  s'afficher  dans  la  fenetre  4,  par  exemple, 
la  commande  WIN  DOW  SWAP  permet  de  la  substituer  a  la  fenetre  par  defaut : 

WINDOW    SWAP    0,4 

Le  message  Ready  qui  va  suivre  cette  commande  s'affiche  alors  dans  la  fenetre  verte.  Le 
curseur  sc  trouve  immediatement  dessous.  Tapcz  maintenant  la  ligne  : 

PRINT  #4, "coucou" 


Avosheuresdeloisir...  Chapitre  9    Page  27 


...et  le  mot  *  coucou  »  va  apparaitre  directement  sous  la  commande  WINDOW  SWAP 
dans  l'ancienne  fenetre  O,  (la  fenetre  4  a  present).  II  ressort  que  la  position  d'un  affichage 
a  1'interieur  d'une  fenetre  est  stockee  et  que,  meme  apres  un  WIN  DOW  SWAP.  Ie  texte 
s'affiche  sur  cette  position  piutot  qu'en  haut.  Entrez  : 

LOCATE  #4,28,1 

PRINT  "la  fenetre  0  est  ici "  .  .. 

PRINT  t4,"ceci  est  la  fenetre  4" 

Le  message  «  la  fenetre  0  est  ici  »  apparait  sur  la  ligne  PRINT  tandis  que  le  message 
«  ceci  est  la  fenetre  4  »  s'affiche  au  milieu  de  la  premiere  ligne  de  l'ecran. 

Avant  1'entree  d'une  commande  WINDOW,  les  huit  fenetres  couvrent  la  totalite  de 
l'ecran.  C'est  egalement  vrai  pour  une  commande  MODE.  Ainsi,  lorsqu'apres  avoir  uti- 
lise des  fenetres,  le  curseur  se  trouve  dans  une  fenetre  tres  reduite,  il  vous  suffit  de  taper 
MODE  1,  comme  ceci : 

MODE  1 

WINDOW  20,21,7,18 
MO 
DE 
1 

Ne  vous  inquietez  pas  si  le  mot  MODE  est  coupe  en  deux,  cela  ne  Pempeche  pas  de  rem- 

plir  sa  fonction.  Par  contre,  n'oubliez  pas  de  laisser  un  espace  entre  MODE  et  1 . 

Vous  connaissez  maintenant  le  fonctionnement  des  fenetres,  essayez  done  d'entrer  ce  petit 
programme : 

10  MODE  0 

20  POR  n=0  10  7 

30  WINDOW  #n,n+l,n+6,n*l,n+6 

40  PAPER  *n,n+4 

50  CIS  #n 

60  POR  c«l  TO  200 :NOi  c 

70  NEXT  n 

II  definit  huit  fenetres  de  couleurs  differentes  se  chevauchant.  Lorsque  l'execution  du  pro- 
gramme est  terminee  et  que  le  message  «  Ready  »  apparait,  appuyez  sur  ENTER  plu- 
sieurs  fois  et  observez  le  changement  de  couleur  de  l'ecran  que  provoque  le  defilement  de 
la  fenetre  0.  Les  blocs  de  couleur  defilent,  mais  Femplacement  des  autres  fenetres  ne 
change  pas.  Entrez  maintenant ; 

CL5    #4 
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.-;,pour  constater  que  la  quatrieme  fenetre  est  toujours  a  la  meme  place.  Comme  vous  vous 
en  doutiez,  le  nouveau  bloc  de  couleur  a  obscurci  ceux  qu'il  recouvre.  A  litre  informatif, 
observez  la  difference  entre  les  diverses  entrees : 

LIST 
LIST  #4 
LIST  »3 

La  commande  WINDOW  presente  une  autre  particularite  qu'illustre  le  dernier  pro- 
gramme de  ce  chapitre :  Pordre  d'entree  des  dimensions  gauche  et  droite  des  fenetres 
importe  peu.  En  effet.  si  le  premier  parametre  est  superieur  au  second,  le  BASIC  trie  auto- 
matiquement  les  dimensions  et  les  replace  dans  Pordre  .Cette  remarque  est  egalement 
valable  pour  les  limites  inferieures  et  superieures  des  fenetres. 

10  HOOE  a 

20  a  =  l+RND*l(?:b=l+PNl.>*lV 

30  c-l+RNOI24:d=i+RND124 

40  e=RND*15 

50  WINDOW  a,b,c,d 

60  PAPER  e:CLS 

70  6010  20 


Puis-je  vous  interrompre  ? 

Vous  1'avcz  peut-ctre  remarque.  Tune  des  innovations  logicielles  majeures  des  ordinateurs 
AMSTRAD  consiste  a  gerer  les  interruptions  a  partir  du  BASIC :  en  d'autres  termes,  le 
BASIC  AMSTRAD  est  capable  d'executer  un  certain  nombre  dc  taches  independantes  a 
Pintericur  d'un  meme  programme.  Cette  capacite.  connue  sous  le  termedc  «  multitache  », 
est  gerce  par  les  commandos  AFTER  et  EVERY. 

La  possibility  de  mettre  les  sons  en  file  d'attente  et  de  les  synchroniser  par  des  rendez- 
vous represente  un  autre  exemple  de  cette  particularite. 

La  synchronisation  du  systeme  incombe  a  son  horloge  maitresse.  Elk  est  constitute  d'un 
systeme  de  synchronisation  a  quartz,  integre  dans  Pordinateur  veillant  a  Porganisation 
chronologique  des  evenements  (le  balayage  de  Paffichage  et  la  frequence  du  processeur, 
par  exemple).  Toutes  les  fonctions  materielles  se  rapportant  au  temps  peuvent  se  retrou- 
ver  dans  1'horloge  a  quartz  du  systeme. 

L'implementation  logicielle  de  cette  synchronisation  appartient  aux  eommandes  AFTER 
et  EVERY.  Fidelcs  a  la  convivialite  du  BASIC  AMSTRAD,  celles-ci  font  exactement  ce 

qu'elles  indiquent :  AFTER  (apres)  la  duree  definie  dans  la  commande,  le  programme 
donne  le  controle  au  sous-programme  indique  qui  execute  la  tache  definie. 
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Le  6128  gere  en  permanence  une  horioge  temps  reel.  La  commande  AFTER  permet 
a  un  programme  en  BASIC  d'appeler  des  sous-programmes  a  un  moment  donne.  Quatre 
chronometres  sont  ainsi  disponibles,  chacun  pouvant  etre  associe  a  un  sous-programme. 

Apres  ecoulement  du  delai  specine,  le  sous-programme  est  automatiquement  appele, 
comme  il  le  serait  par  une  instruction  GOSUB,  A  la  fin  du  sous-programme,  la  com- 
mande RETURN  provoque  la  reprise  du  programme  principal  a  1'endroit  meme  de  ['in- 
terruption. 

La  commande  EVERY  permet  a  un  programme  en  BASIC  de  rappeler  des  sous-pro- 
grammes a  intervalles  reguliers.  Cette  fois  encore,  quatre  chronometres  sont  disponibles 
et  chacun  peut  etre  associe  a  un  sous-programme. 

Les  chronometres  possedent  differentes  priorites  d'interruption.  Le  chronometre  3  cor- 
respond a  la  priorite  superieure  et  le  chronometre  0  a  la  priorite  inferieure.  (Pour  de  plus 
amples  renseignements,  consultez  le  chapitre  «  Pour  information... »). 

10  MODE  l;n=<14;x=RND»400 

20  AFTER  x,3  GOSUB  80 

30  EVERY  25,2  GOSUB  160 

40  EVERY  10. 1  GOSUB  170 

50  PRINT"Testez  vos  reflexes" 

60  PRlNT"Appuyez  sur  la  barre  espace." 

70  IF  Haq=l  THEN  END  ELSE  70 

80  2=REMAIN(2) 

90  IF  INKEY(47>=-i  THEN  110 

100  SOUND  l,900sPRINT"Tricheur  !";G0TD  150 

110  SOUND  129,20:PRINT"MAINTENANT":t=TIME 

120  IF  INKEY<47)=-1  THEN  120 

130  PRINT"vous  avez  mis"; 

140  PRINT  <TIME~t>/300; "seconds" 

150  CLEAR  INPUTsHagaljRETURN 

160  SOUND  1,0,50;PRINT". ";:RETUKN 

170  n=n+l:IF  n>26  THEN  n=14 

180  INK  l,n:RETURN 


Les  commandes  AFTER  et  EVERY  peuvent  intervenir  a  tout  moment  pour  reinitialiser 
le  sous-programme  concerne  en  accord  avec  le  chronometre.  Ces  deux  commandes  se 

partagent  les  chronometres,  une  commande  AFTER  annulant  toute  commande  EVERY 
anterieure  pour  un  chronometre  donne  et  inversement. 

Les  commandes  Dl  et  El  desactivent  et  activent  les  interruptions  de  chronometre  tout  en 

permettant  1'execution  des  commandes  les  separant.  Une  interruption  de  priorite  elevee 
est  ainsi  dans  I'impossibilite  de  perturbcr  le  deroulement  d'une  interruption  de  priorite 
moindre.  La  fonction  REMAIN  desactive  le  comptage  d'un  des  chronometres  et  restitue 
le  nombre  d'impulstons  restantes  avant  1c  declenchement  de  1'interruption. 
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Utilisation  des  donnees... 

Dans  un  programme  necessitant  I'entree  d'un  meme  ensemble  d'informations  des  le 
debut,  il  serait  judicieux  de  pouvoir  entrer  toutes  les  valeurs  une  fois  pour  toutes.  C'est  le 
role  des  commandes  R  EAD  et  DATA.  R  EAD  est  tres  similaire  a  IN  PUT  dans  le  sens  oii 

elle  affecte  des  valeurs  a  des  variables.  Flic  en  differe  cependant  par  le  fait  que  ces  valeurs 
sont  lues  a  partir  des  commandes  DATA  au  lieu  d'etre  entrees  au  clavier.  En  voici  deux 
exempies : 

10   READ    a,b,c 

20  PRINT" les   nombres  sont"; a; "et " ; b ; "et ";c 

38    DATA    12, 14,21 

run 


i.< 


i*  ■'     run 


118   INPUT   "fcntres    3  nombres   separes   par   une   virqule";a,b,c 
20  PRINT "les   notnbres   sent ";a; "et " }b; "et "5c 


Des  virgules  separent  les  differents  elements  d'une  commande  DATA,  tout  eomme  pour 
la  commande  INPUT. 

Outre  des  valeurs  numeriques,  les  commandes  DATA  peuvent  contenir  des  constantes 

alphanumeriques : 

10   DIM  a*(i0) 
20   FOR    i=0    TO   9 
30    READ    a*<i) 
40   NEIVT 

50  FOR  1=0  TO  9 
'    69   PRINT  a$(i) ; "  "; 
70  NEXT 

80    DA  i  A    r  ten,  ne,  stir  t,  de,  courr  i  r  ,  1  1  ,  -f  *ut ,  par  t  i  r  ,  a  ,  poi  nt 
run 


Bien  que  la  commande  DATA  comporte  des  chaines,  celles-ci  ne  se  trouvent  pas  entre 
guillemets.  L'cmploi  des  guillemets  est  en  effet  facultatif  pour  la  commande  DATA, 
comme  lors  de  I'entree  d'une  chaine  en  reponse  a  une  commande  INPUT.  lis  sont  cepen- 
dant tres  utiles  lorsque  les  chaines  de  donnees  contiennent  elles-memes  des  virgules.  En 

casd'omission,  1'instruction  READ  interpreterait  ces  virgules  comme  les  virgules  conven- 
tionnelles  de  la  commande  DATA,  coupant  ainsi  la  chaine  en  plusieurs  troncons. 
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18  READ  a$ 

20  WHILE  a$0"*" 

30  PRINT  at 

40  READ  a$ 

50  WEND 

60  DA7A  J'ai  longtemps,  habite,sous  de  vastes  portiques 

70  DATA  Que,  des,  saleils  marins,  teiqnaient,  de  mille  feux 

80  DATA  t 

run 


La  chaine  de  ia  Iigne  60  comporte  des  virgules  entramant  Ie  lecture  et  l'affichage  de  cha- 
que  partie.  Par  contre,  la  chaine  de  la  ligne  70  est  delimitee  par  des  guillemets,  et  sera 
done  affichee  comme  un  tout. 

L'exemple  ci-dessus  montre  que  les  donnees  peuvent  occuper  plusieurs  lignes.  READ 
traite  les  lignes  de  haut  en  bas  dans  l'ordre  des  numerosde  ligne  (60,  70,  80,  etc.).  Par 
ailleurs,  les  instructions  DATA  peuvent  se  trouver  n'importe  ou  dans  Ie  programme : 
avant  ou  apres  Ia  commande  READ  qui  extrait  les  informations. 

Si  un  programme  contient  plusieurs  commandes  READ,  la  seconde  reprend  la  ou  la  pre- 
miere s'arrete : 

10  DATA  123,456,789,321,654,2343 

20  FOR  i=l  TO  5' 

30  READ  nomb 

40  total=total+nomb 

50  NEXT 

60  READ  tota!2 

70  IF  total=toU12  THEN  PRlNT"les  donnees  sont  just«"  ELSE 

PRINT" t 1  y  a  une  erreur  dans  les  donnees" 

run 


Essayez  de  modifier  Ia  ligne  10  en  introduisant  une  erreur  dans  l'un  des  cinq  premiers 
nombres,  puis  iancez  le  programme.  Cette  methode  d'insertion,  a  la  fin  d'une  commande 
DATA,  d'une  valeur  supplemental  egaie  a  la  somme  de  toutes  les  autres  valeurs  consti- 
tue  un  bon  moyen  de  detection  d'eventueiles  erreurs,  surtout  lorsque  les  lignes  DATA 
sont  nombreuses.  Cette  methode  s'appelle  somme  de  controle  (checksum). 

Si  un  programme  fait  appel  a  des  donnees  mixtes  (chaines  et  nombres),  il  est  possible  de 
les  combiner  dans  les  instructions  DATA  et  READ,  a  condition  que  les  elements  soient 
lus  correctement.  Par  exemple,  si  DATA  contenait  des  sequences  de  deux  nombres  suivis 
d'une  chaine,  seul  l'emploi  d'une  commande  READ  suivie  de  deux  variables  numeriques 
et  d'une  chaine  serait  justifie  : 
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10  DIM  a<5) ,b(5) ,p$(5) 

20  FOR  i=l  TO  5 

30  READ  a(i),bU)  ,p*<i) 

40  NEXT 

50  DATA  i,7,f red,3,9(fr*ncoii,2,2,dany,4,6,olivier,9llltric 

60  FOR  i=l  TO  5 

70  PRINT  p*<i),B:B;a<i)*bm- 

80  NEXT 

Vous  pouvez,  pour  changer,  separer  les  differents  types  de  donnees : 

10  DIM  a<5) ,b!5) ,p$<5) 

20  FOR  i=l  TO  5 

30  READ  aft ) ,b(i ) 

40  NEXT 

50  FOR  1=1  TO  5 

60  READ  p$<i) 

70  NEXT 

80  DATA  1,7,3,9,2,2,4,6,9,1 

90  DATA  fred,f rancais.dany, Olivier, eric 

100  FOR  i=l  TO  5 

110   PRINT   pKii  ,  "i  ";a<i  llhd  1 

120   NEXT 

Si  la  boucle  FOR  de  la  ligne  20  se  change  en : 
20   FOR    1=1    TO    4 

...les  deux  premiers  essais  de  lecture  des  chaines  a  la  ligne  60  donnent  alors  "  9  "  puis 
"  1  ".  Bien  qu'elles  soient  valides,  ces  valeurs  ne  representent  pas  vraiment  le  resultat 
attendu  !  Pour  obtenir  les  valeurs  souhaitees,  il  faudrait  introduire  dans  le  programme  les 
commandes : 

15  RESTORE  80 
45  RESTORE  90 

La  commande  RESTORE  place  le  pointeur-lecteur  de  DATA  a  la  ligne  specifiee  et  peut 
ainsi  servir  dans  unc  commande  conditionnelle  pour  lire  certains  blocs  de  donnees  selon 

des  criteres  donnes.  De  cette  maniere,  dans  un  jeu  a  plusieurs  niveaux  possedant  plusieurs 
ecrans,  les  donnees  de  chaque  ecran  pourront  etre  extraites  en  fonction  d'une  variable 
(leur  niveau,  par  exemple).  Voici  un  programme  de  ce  type  : 
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1000  REM  section  de  dessin  sur  ecran 

1018  IF  niveau=t  THEN  RESTORE  2010 

1028  IF  niveau=2  THEN  RESTORE  2510 

1030  IF  niveau=3  THEN  RESTORE  3010 

1040  FOR  y=l  TO  25 

1050  FOR  x  =  l  TO  40 

1060  READ  char 

1070  LOCATE  x,y;PRINT  CHR$(char); 

1080  NEXT  x,y' 

• 

2000  REM  DATA  pour  1'ecran  1 

2010  DATA  200,190,244,244,210  ...etc 

2500  REM  DATA  paur  1'ecran  2 

2510  DATA  100,103,245,243,251  ...etc 

3000  REM  DATA  pour  1'ecran  3 

3810  DATA  190,191,192,193,194  ...etc 

Les  commandes  DATA,  READ  et  RESTORE  peuvent  egalement  etre  illustrees  par  un 

programme  musical.  Les  periodes  sonore  sont  lues  (READ)  dans  les  commandes  DATA 
tandis  que  R  ESTORE  relance  une  section  en  ramenant  le  pointeur  au  debut  d'une  partie 
donnee  du  programme : 

10  FOR  i=l  TO  3 

20  RESTORE  100 

30  READ  note 

40  WHILE  note  <>-t  .  • 

50  SOUND  1, note, 35 

60  READ  note  .  ..,.»,^v 

70  WEND 

80  NEXT 

90  SOUND  1,  142,  100 

100  DATA  95,95,142,127,119,106 

110  DATA  95,95,119,95,95,119,95 

120  DATA  95,142,119,142,179,119 

130  DATA  142,142,106,119,127,-1 

run 
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Des  sons  a  votre  portee... 

Parmi  les  fonctions  du  6128,  les  commandes  de  son  et  d'enveloppe  vous  paraitront 
probablement  les  plus  obscures  a  premiere  vue.  II  n'y  a  absolument  pas  de  quoi.  Avec 
un  peu  d'entrainement,  vous  serez  capable  d'obtenir  toute  une  gamme  d'effets  sonores 
differents  et  meme  de  composer  des  harmonies. 

Commencons  par  les  quatre  premieres  parties  de  la  commande  SOUND  :  numero  de 
canal,  periode  sonore,  duree  de  la  note  et  volume.  Vous  vous  demandez  peut-etre  quelles 
valeurs  chaque  nombre  peut  prendre  ? 

Pour  le  moment,  nous  laisserons  la  premiere  partie  (numero  de  canal)  de  cote,  car  ce  n'est 
pas  la  plus  simple.  La  periode  sonore  peut  prendre  les  valeurs  0  a  4095,  mais  seules 
quelques-unes  de  ces  valeurs  correspondent  a  des  notes  de  musique  (elles  sont  listees  dans 
la  partir  5  du  chapitre  «  Pour  information...  »).  Ainsi,  le  nombre  239  correspond  au  Do 
medium  et  253  a  la  note  situee  juste  en-dessous :  le  Si.  Mais  ie  son  obtenu  avec  les  valeurs 
240  a  252  ne  correspond  a  aucune  des  notes  du  piano.  Aucune  note  n'est  jouee  lorsque  la 
periode  est  fixee  a  0,  ce  qui  nous  sera  bien  utile  lorsque  nous  passerons  au  «  bruit » (voir 
plus  loin). 

La  troisieme  partie  de  la  commande  SOUND  fixe  la  duree  de  la  note  en  centiemes  de 
seconde.  Les  valeurs  admissibles  se  situent  entre  I  et  32767  (inclus).  Toutefois,  pour  une 

valeur  nulle  (zero),  la  duree  de  la  note  est  determinee  par  1'enveloppe  selectionnee  (on  y 
reviendra).  Une  valeur  negative  indique  qu'il  faut  repeter  1'enveloppe  le  nombre  de  fois 
specifie.  Ainsi,  -3  signifie  «  repete  1'enveloppe  de  volume  3  fois  » (nous  y  reviendrons  ega- 
lement  plus  tard). 

La  quatrieme  partie  de  la  commande  est  le  volume.  II  prend  les  valeurs  0  a  15  (12  par 
defaut).  Dans  les  sons  que  nous  avo'ns  entendus  jusqu'a  present,  le  volume  etait  constant 
pendant  toute  l'execution  de  la  note.  Lorsque  la  note  est  modulee  par  une  «  enveloppe  de 
volume  ».  la  valeur  indiquee  dans  la  commande  SOUN  D  concerne  le  volume  au  depart 
de  la  note. 

Voyons  maintenant  le  numero  de  canal.  Autant  vous  dire  des  a  present  qu'il  correspond 
a  un  nombre  binaire  -  il  va  done  vous  falloir  etudier  un  peu  les  nombres  binaires  afin  d'en 

comprendre  la  signification  (voir  la  premiere  partie  de  ce  chapitre). 

Vous  avez  le  choix  entre  trois  canaux  pour  jouer  un  son.  Si  votre  ordinateur  est  connecte 
a  un  amplificateur  stereophonique,  l'un  des  canaux  va  sur  la  sortie  gauche,  ['autre  sur  la 
sortie  droite  et  le  troisieme  sur  les  deux  a  la  fois  (au  milieu).  Les  numeros  suivants  sont 
utilises  pour  indiquer  le  canal  sur  lequel  une  note  doit  etre  jouee  : 

1  canal  A 

2  canal  B 
4  canal  C 
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Lorsque  vous  desirez  jouer  sur  plusieurs  canaux,  il  vous  suffit  d'additionner  les  numeros 
des  canaux  desires.  Ainsi,  pour  jouer  sur  A  et  C,  vous  indiquerez  1+4=5. 

SOUND    5,284 

Vous  vous  demandez  certainement  pourquoi  on  a  attribue.au  canal  C  Ie  numero  4  au  lieu 
de  3.  Cela  tient  au  fait  que  Ton  n'a  utilise  ici  que  des  puissances  de  2  (1  =2|0,  2  =  2fl, 
4=2y2),  si  bien  que  Ieurs  combinaisons  ont  la  structure  d'un  nombre  binaire.  Dans  un 
nombre  binaire  de  trois  chiffres,  chacun  des  chiffres  peut  prendre  les  valeurs  0  ou  1 ,  deter- 
minant ainsi  l'etat  en  service  ou  hors  service  du  canal  correspondant.  Ainsi,  dans  notre 
exemple  : 

5  en  notation  decimale  equivaut  a  1*4+0*2  +  1*1,  done  101,  en  notation  binaire.  En 

associant  un  chiffre  binaire  a  chaque  colonne  A,  B  ou  C  on  obtient : 

CBA 

10  1 

En  d'autres  termes,  le  canal  C  est  en  service,  le  canal  B  est  hors  service  et  le  canal  A  est 
en  service.  Si  Ton  desire  jouer  une  note  sur  les  canaux  A  et  B  il  faut  tndiquer : 

CBA 
Oil 

Le  nombre  binaire  Oil  correspondant  a  0*4+1*2+1*1  =3,  la  commande  SOUND 

prend  la  forme  : 

SOUND    3,H2 

Naturellement,  on  obtient  exactement  le  meme  resultat  en  additionnant  simplement  les 
numeros  de  canal  (souvenez-vous  que  A=  1,  B  =  2  et  C=4).  Le  numero  a  indiquer  pour 
jouer  sur  les  canaux  A  et  B  est  done  bien  1+2  =  3. 

Ne  vous  inquietez  surtout  pas  si  vous  n'avez  pas  compris  cette  demonstration.  La  seule 
chose  vraiment  importante  a  retenir  pour  choisir  une  combinaison  de  canaux  est  l'addi- 

tion  des  numeros  de  canal. 

Helas,  1,  2  et  4  ne  sont  pas  les  seuls  parametres  de  numero  de  canal.  Les  valeurs  8,  16  et 
32  peuvent  egalement  etre  utilisees,  afin  d'indiquer  qu'un  son  produit  sur  un  canal  a  ren- 
dezvous avec  un  autre  canal  (A,  B  et  C  respectivement).  Qu'entendons-nous  par  rendez- 
vous ?  C'est  tres  simple :  les  sons  que  nous  avons  fabriques  jusqu'a  present  etaient  imme- 
diatement  joues  sur  le  canal  indique.  Essayez  done  ce  qui  suit : 

SOUND    1,142,2000 

SOUND    1,90,200 
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A  moms  d'etre  particulierement  lent  au  clavier,  vous  avez  constate  que  vous  aviez  le 

temps  de  taper  la  seconde  commande  avant  que  la  premiere  n'ait  fini  de  s'executer.  Ceci 
est  du  au  fait  que  le  mode  sonore  est  capable  de  maintenir  jusqu'a  5  commandes  SOUND 
en  file  d'attente  pour  un  meme  canal.  Supposons  que  nous  desirions  jouer  un  son  sur  le 
canal  A,  puis  deux  sons  simultanes  sur  les  canaux  A  et  B.  11  faudrait  bien  trouver  un 
moyen  d'indiquer  a  Pordinateur  qu'il  ne  doit  pas  emettre  le  son  du  canal  B  avant  que  le 
canal  A  ne  soit  pret  a  entamer  sa  seconde  note.  C'est  aiors  qu'intervient  la  notion  de  ren- 
dezvous, que  Ton  obtient  de  deux  facons  differentes  : 

SOUND    1,2130,1080 
SOUND   3,90,200 

La  seconde  note  est  ici  dirigee  sur  A  et  B,  elle  ne  pcut  done  Stre  jouee  qu'apres  la  fin  de 
la  note  du  canal  A.  On  fait  ainsi  attendre  une  note  jusqu'a  ce  que  les  canaux  qu'elle  doit 
utiliser  soient  libres.  Inconvenient  evident :  le  meme  son  sera  dirige  sur  chacun  des  canaux 
(le  son  ,90,200,  dans  notre  cas,  est  joue  par  A  et  B).  Voici  l'autre  methode  : 

SOUND  1,200,2000 
SOUND  1+16,90,200 
SOUND  2+8, 140,400 

Dans  cet  exemple,  on  fixe  a  la  seconde  note  de  A  un  rendez-vous  avec  la  note  de  B  (et  a 
la  note  de  B  un  rendez-vous  avec  celle  de  A).  L'avantage  est  clair  :  les  deux  notes  pour- 
raient  etre  differentes,  elles  seraient  neanmoins  liees  de  sorte  qu'aucune  ne  pourrait  etre 
emise  sans  que  les  deux  canaux  ne  soient  libres.  Voila  done  ce  qu'on  appelle  un  rendez- 
vous. La  encore,  la  signification  de  ces  valeurs  n'apparait  qu'en  binaire  : 

8=2|3,  16=214,  et  32=2f5. 

Nous  pouvons  done  maintenant  nous  representer  le  numero  de  canal  sous  la  forme  d'un 
nombre  binaire  dont  les  chiffrcs  portent  les  titres  suivants  : 

Rendez-vous  avec     Rendez-vous  avec     Rendez-vous  avec      Jouer  sur       Jouer  sur       Jouer  sur 
C  B  A  C  B  A 

Ajouter32  Ajouter  16  Ajouter  8  Ajouter4       Ajouter  2       Ajouter  I 

Ainsi,  pour  jouer  sur  C  une  note  ayant  rendez-vous  avec  A,  vous  specifiez  : 

0  0  110  0 


C'est-a-dire  le  nombre  1 100,  correspondant  en  decimale  a  8+4=  12. 

Le  numero  de  canal  12  indiquera  done  a  Pordinateur  qu'avant  de  jouer  une  note  sur  le 

canal  C  il  doit  attendre  la  note  du  canal  A  avec  laquelle  il  a  rendez-vous. 
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Si  Ton  ajoute  au  numero  de  canal  Ie  nombre  64  (2f  6),  l'ordinateur  retient  la  note  sans  la 
jouer.  Cette  valeur  indique  en  effet  que  la  note  n'est  liberee  que  lors  d'une  commande 
RELEASE 

Enfin,  si  1'on  ajoute  128  (2t?),  la  file  d'attente  du  canal  indique  est  annulee.  Vous  pouvez 
utiliser  cette  valeur  pour  arreter  rapidement,  sur  un  canal  donne,  un  son  qui  risque  de 
durer  trop  longtemps : 


SOUND    1    248    30000  (ce  son  durerait  cinq  minutes,  mais) 

SOUND    1+128^0  (lui  coupe  le  sifflet) 

En  mode  direct,  le  moyen  le  plus  rapide  d'ar/eter  un  son  est  d'appuyer  sur  la  touche 

[DEL]  en  debut  de  ligne  :  le  signal  sonore  d'avertissement  vide  alors  immediatement  tous 
Ies  canaux  sonores. 

Maintenant  que  vous  savez  diriger  un  son  sur  Tun  des  trois  canaux  (en  fixant  au  besoin 
des  rendez-vous),  vous  aimeriez  certainement  apprendre  a  produire  des  sons  un  peu  plus 
melodieux  que  ceux  auxquels  vous  limite  la  commande  SOUND  telle  que  vous  1'em- 
ployez.  II  vous  faut  pour  cela  attribuer  au  son  une  enveloppe,  c'est-a-dire  un  modele 
definissant  la  variation  du  volume  en  cours  d'execution.  Lorsqu'une  note  est  jouee  sur  un 
instrument,  on  a  d'abord  une  attaque  pendant  Iaquelle  le  volume  augmente  tres  rapide- 
ment,  apres  quoi  il  descend  a  un  niveau  inferieur,  auquel  il  se  maintient  un  certain  temps 
avant  de  s'eteindre  progress! vement.  II  est  parfaitement  possible  de  reproduire  cette  dyna- 
mique  sonore  au  moyen  de  la  commande  SOUND.  On  utilise  pour  cela  la  commande 
associee  ENV.  Commencons  par  un  exemple  tres  simple  ; 

ENV    1,5,3,4,5,-3,8 
SOUND    1,142,0,0,1 

La  commande  ENV  est  specifiee  avant  la  commande  SOUND  a  Iaquelle  elle  s'applique. 
Pour  utiliser  une  enveloppe  avec  la  commande  SOUND,  on  indiquera  son  numero  au 
cinquieme  parametre  de  cette  derniere  {dans  l'exemple  ci-dessus,  nous  avons  choisi  1'enve- 
loppe  numero  I).  Le  premier  parametre  d'une  commande  ENV  est  son  numero,  Du  fait 
que  la  commande  ENV  indique  la  duree  et  Pintensite  d'une  note,  on  fixera  a  0  les  parame- 
tres  de  la  commande  SOUND  correspondants.  L'enveloppe  ci-dessus  definit  une 
augmentation  de  volume  en  cinq  pas  correspondant  a  une  augmentation  de  3  unites  et 
durant  4  centiemes  de  seconde  chacune.  Le  son  diminue  ensuiie  en  5  pas  de  3  unites  et  de 
8  centiemes  de  seconde.  Ainsi,  le  premier  nombre,  ou  «  numero  d'enveloppe  »,  est  suivi 
de  deux  groupes  de  trois  nombres.  A  l'inlerieur  d'un  groupe  se  trouve  un  premier  nombre 
indiquant  en  combien  de  pas  s'effectuera  Paugmentation  ou  la  diminution  de  volume,  un 
deuxieme  indiquant  la  variation  de  volume  au  cours  de  chaque  pas,  et  le  troisieme  la 
duree  de  ces  pas. 
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La  duree  totale  correspond  au  premier  nombre  (Ie  nombre  de  pas)  multiplie  par  le 
troisieme  (la  duree  d'un  pas).  La  variation  totale  d'amplitude  du  volume  est  egale  a  celle 
de  chaque  pas  multipliee  par  ie  nombre  de  pas.  La  duree  totale  d'une  enveloppe  compre- 

nant  plusieurs  segments  est  egale  a  la  somme  des  durees  de  chacun  des  segments. 

Le  volume  initial  (defini  dans  la  commande  SOUND),  peut  bien  sur  etre  different  de  0. 
L'enveloppe  definie  dans  le  premier  exemple  formait  un  crescendo  suivi  d'un  decres- 
cendo.  Voici  maintenant  un  decrescendo  suivi  d'un  crescendo  : 

ENV   2,5,-2,1,20,0,1,10,1, 1 

SOUND    1,248,0,15,2 

Cctte  enveloppe,  qui  portera  le  numero  2,  est  composee  de  trois  segments.  Dans  le  pre- 
mier, le  volume  decroit  en  5  pas  de  -2.  II  diminue  done  de  2  a  chaque  pas  d'un  centieme 
de  seconde.  Le  second  segment  comprend  20  pas,  au  cours  desquels  le  taux  de  variation 
est  de  0  (le  volume  est  done  constant).  La  encore,  la  duree  d'un  pas  est  de  1  centieme  de 
seconde.  Le  troisieme  segment,  enfin,  comprend  10  segments  augmentant  le  volume  de 
1  chacun  et  durant  egalement  l  centieme  de  seconde. 

Comme  la  commande  SOUND  indique  un  volume  initial  de  1 5,  ce  dernier  sera  done  de 
5  apres  le  premier  segment,  il  restera  a  ce  niveau  pendant  20  centiemes  de  seconde,  avant 
de  remonter  jusqu'a  15  au  cours  du  dernier  segment  de  l'enveloppe. 

Si  cette  representation  chiffree  de  l'enveloppe  vous  semble  trop  abstraite,  yous  prefererez 
peut-elre  la  dessiner  d'abord  sur  un  graphe.  puis  en  extraire  les  valeurs  a  introduire  dans 
la  commande  ENV.  Voici  la  representation  graphique  des  deux  enveloppes  definies  jus- 
qu'a present : 


Variation  de  volume 


-1/100  seconde 


NOMBRE  D'ETAPES  5  NOMBRE  D'ETAPES  5 

VARIATION  PAR  ETAPE  3  VARIATION  PAR  ETAPE  -3 

DUREE  PAR  ETAPE  4  DUREE  PAR  ETAPE  8 
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n  ombre 

d'itapes 

5 

variation  par 

etape  -2 

dure©  par 

etape  1 


NOMBRE   D'ETAPES  20 
VARIATION  PAR  ETAPES  0 
DUREE  PAR   ETAPE 1 


Une  enveloppe  pouvant  contenir  jusqu'a  cinq  segments  de  trois  valeurs  chacun,  Pinstruc- 
tion  ENV  peut  done  utiliser  un  maximum  de  16  parametres  (en  comptant  le  numero 
d'identification  de  Penveloppe,  compris  entre  1  et  15).  Lorsque  les  variations  de  volume 

indiquees  excedent  les  limites  d'intensite  autorisees  (entre  0  et  15),  la  valeur  de  Fintensite 
boucle  sur  elle-meme,  si  bien  que  la  premiere  valeur  depassant  15  correspond  au  volume 
0  et  la  premiere  au-dessous  de  0.  au  volume  1 5 : 

ENV    3,9,5,20 

SOUND     1,142,0,0,3 

Cette  enveloppe  tres  simple  definit  9  pas  au  cours  desquels  le  volume  augmente  de  5  en 
5  pour  une  duree  de  20  centiemes  de  secondes  chacun.  Le  volume  atteint  le  niveau  15  a 
la  fin  du  troisieme  pas,  si  bien  que  la  variation  suivante  amene  celui-ci  a  4,  la  suivante  a 
9  etc...  Voici,  sous  forme  graphique,  Peffet  produit  par  cette  commande  : 
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Variation 
de  volume 


90 


NOMBRE   D'ETAPES  9 
VARIATION   PAR   ETAPES  5 
DUREE  PAR  ETAPE  20 


Le  nombre  des  pas  peut  varier  de  0  a  127  et  leur  amplitude  de  -128  a  +  127  (une  valeur 
negative  correspondant  a  une  diminution  de  volume).  La  duree  des  pas  peut  prendre  des 
valeurs  allant  de  0  a  255. 

Nous  savons  maintenant  modeler  a  volonte  1'enveloppe  de  volume.  Voyons a  present 
comment  jouer  sur  la  hauteur  de  la  note  pour  creer.  par  exemple.  un  effet  de  vibrato, 
c'est-a-dire  une  note  oscillant  autour  d'une  hauteur  donnee. 

La  procedure  a  suivre  ressemble  beaucoup  a  celle  de  l'enveloppe  de  volume.  On  utilise  la 
fonction  ENT,  dont  voici  un  exemple. 

ENT    1,5,1,1,5,-1,1 

SOUND    1, 142, 10, 15, ,1 

Le  numero  d'enveioppe  de  tonalite  constitue  le  sixieme  parametre  de  la  commande 
SOUND.  La  encore,  la  commande  ENT  doit  intervenir  avant  la  commande  SOUND. 


A  vos  heures  de  loisir. 
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La  commande  ENT  de  ce  premier  exemple  precise  que  I'enveloppe  numero  1  est  compo- 
see  de  5  pas  augmentant  la  periode  d'une  unite  et  durant  un  centieme  de  seconde  chacun. 
La  partie  suivanle  definit  egalement  5  pas  diminuant  de  1  la  periode  et  durant  un  cen- 
tieme de  seconde  chacun.  La  duree  totale  de  I'enveloppe  est  de  5  +  5  =  10.  Vous  remar- 
quez  que  nous  avons  du  indiquer  cette  duree  a  I'interieur  de  la  commande  SOUND.  En 
effet,  a  la  difference  de  ENV.  ia  commande  ENT  ne  precise  pas  la  duree  de  la  note  jouee. 
Si  la  duree  indiquee  dans  la  commande  SOUND  est  plus  courte  que  celle  de  I'enveloppe 
de  ton,  une  partie  de  cette  dernierc  sera  perdue.  Si,  au  contraire,  elle  est  plus  longue,  la 
fin  de  la  note  ne  subira  aucune  variation  de  periode.  Ceci  est  egalement  valable  lorsque 
I'enveloppe  de  volume  determine  la  duree  de  Ia  note. 

(Remarquez  egalement  1'absence  du  parametre  «  enveloppe  de  volume  »,  cette  enveloppe 
n'etant  pas  creee  pour  notre  exemple). 

La  duree  de  I'enveloppe  de  tonalite  est,  dans  la  plupart  des  cas,  beaucoup  plus  courte  que 
celle  de  Ia  note.  On  indique  alors  qu'eile  doit  se  reproduire  jusqu'a  la  fin  de  la  note,  en 
choisissant  un  numero  d'enveloppe  negatif.  Le  parametre  utilise  dans  la  commande 
SOUND  est  le  nombre  positif  correspondant : 

ENT    -5,4,1,1,4,-1,1 
SOUND    1,142, 100, 12, ,5 

On  obtient  alors  un  effet  de  vibrato.  II  est  souvent  preferable  de  definir  une  enveloppe  de 
tonalite  assurant  une  variation  symetrique  autour  de  la  frequence  initiale,  evitant  ainsi 
que  la  note  ne  s'eloigne  de  plus  en  plus  de  celle-ci.  Essayez  par  exemple  ; 

ENT    -6,3,1,1 

SOUND     1,142, 90, 12, ,6 

La  tres  nette  chute  de  frequence  que  vous  avez  constatee  provient  du  fait  que  chaque  repe- 
tition de  I'enveloppe  augmente  Ia  periode  de  la  note  de  3  unites,  ce  qui  se  produit  30  fois 
(90  divise  par  trois).  Cette  caracteristique  permet  des  effets  de  sirene  ou  de  pedaie  «  wah- 
wah  » : 

ENT    -7,20,1,1,20,-1,1 
SOUND    1,100,400, 12, ,7 

ENT    -8,60,-1,1,60,1,1 

SOUND    1,100, 480, 12, ,8 

On  peut  definir  ainsi  jusqu'a  quinze  enveloppes  numerotees  de  1  a  15,  en  utilisant  Ies 
valeurs  negatives  correspondantes  pour  obtenir  la  repetition  de  I'enveloppe.  Le  nombre 
de  pas,  premier  parametre  de  chaque  groupe,  peut  varier  entre  0  et  239.  L  amplitude  du 
pas  prend,  comme  pour  la  commande  ENV,  des  valeurs  comprises  entre  -128  et  127,  tan- 
dis  que  la  duree  par  pas  doit  etre  comprise  entre  0  et  255.  On  est  la  encore  limite  a  cinq 
segments  composes  de  trois  valeurs  chacun. 
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II  est  possible  d'ajouter  un  dernier  parametre  a  la  commande  SO  U  N  D :  le  niveau  de  bruit 

que  Ton  desire  incorporer  au  son.  Lorsqu'on  utilise  un  bruit,  il  ne  faut  jamais  oublier  que 
cette  fonction  ne  dispose  que  d'un  canal  et  que,  de  ce  fait,  chaque  nouvelle  periode 
recouvrera  la  precedente. 

On  peut  utiliser  un  bruit  soit  en  le  melangeant  a  un  son  pour  modifier  celui-ci,  soit  isole- 
ment  en  donnant  a  la  periode  sonore  (deuxieme  parametre  de  la  commande  SOUND)  la 
valeur  0.  C'est  ainsi  que  Ton  reproduit  les  effcts  de  percussions.  Essayez  par  exemple  : 

ENT  -3,2,1,1,2,-1,1 
ENV  7,15,1,1,15,-1,1 

FOR  a=l  TQ  10:  SOUND  1 , 4080, 0, 0,9,3, IS; NEXT 

Vous  constatez  que  ces  instructions,  elements  de  depart  pour  la  simulation  d'un  bruit  de 
train,  combinent  le  bruit  avec  les  deux  types  d'enveloppes. 

Les  parametres  de  duree  et  de  volume  etant  fixes  a  0  dans  la  commande  SOUND,  ces 
deux  caracteristiques  sont  done  determinees  par  l'enveloppe  de  volume. 

Si  1'utilisation  des  commandes  SOU  ND,  ENV  et  ENT  est  parfaitement  claire  pour  vous, 
nous  allons  pouvoir  aborder  les  differentes  commandes  et  fonctions  qui  leur  sont  asso- 
ciees. 

Lorsque  nous  parlions  du  numero  de  canal  de  la  commande  SOUND,  nous  ayions  dit 
qu'en  lui  ajoutant  le  nombre  64  on  retenait  le  son  dans  une  file  d'attente,  jusqu'a  ce  qu'il 
soit  libere  par  la  commande  RELEASE.  Le  mot  cle  RELEASE  est  suivi  d'un  nombre 
correspondant  au  bit  significatif  de  celui  des  trois  canaux  que  vous  desirez  liberer.  La 

seule  chose  importante  a  retenir  est  que  : 

4  designe  le  canal  C 
2  designe  le  canal  B 
1  designe  le  canal  A 

...et  que  vous  obtiendrez  la  liberation  de  plusieurs  canaux  a  la  fois  en  additionnant  les 
nombres  correspondants.  Ainsi,  pour  liberer  les  sons  retenus  sur  les  trois  canaux,  on  indi- 
quera : 

RELEASE    7 

...le  nombre  7  etant  egal  a  1  +  2  +  4.  L'ordinateur  ne  tient  pas  compte  d'une  commande 
RELEASE  si  aucun  des  canaux  ne  se  trouve  bloque.  Essayez  maintenant : 

SOUND  1+64,90 

SOUND  2+64, 140 

SOUND  4+64,215 

RELEASE  3:  FOR  t=l  10  1 000; NEXT: RELEASE  4 
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Les  sons  definis  par  les  commandes  SOUN D  ne  sont  produits  qu'au  moment  oii  la  pre- 
miere commande  RELEASE  libere  les  canaux  A  et  B.  Le  son  retenu  dans  Ie  canal  C  est 

libere  a  la  fin  de  la  boucie  d'attente. 

II  existe  encore  un  autre  moyen  d'obtenir  un  rendez-vous  de  plusieurs  sons.  Lorsqu'un 
son  est  place  en  file  d'attente  dans  un  canal  a  l'etat  bloque  (numero  de  canal  +  64),  ce 
dernier  retiendra  egalement  tous  les  sons  diriges  ensuite  sur  cette  file.  Si  plus  de  quatre 

sons  supplemental  sont  ajoutes  a  cette  meme  file,  la  machine  effectue  une  pause  sous 
la  forme,  par  exemple,  d'un  sous-programme  appele  apres  un  laps  de  temps  determine 
par  la  commande  AFTER  ou  EVERY.  Cette  methode  est  done  a  deconseiller  en  mode 
sonore,  puisqu'elle  provoque  une  pause  du  programme  des  qu'une  file  se  trouve  surchar- 
gee.  On  rencontre  le  meme  inconvenient  lorsque  de  nombreux  sons  de  longue  duree  sont 
accumules  a  un  rythme  trop  rapide.  Voyez  plutot : 

10  FOR  a=l  TO  8 

20  BOUND  1,1001a,  2U 

30  NEXT 

40  PR  I  NT "bon jour" 

run 

Vous  constatez  que  le  mot "  bonjour  "  ne  s'affiche  qu'au  bout  d'un  certain  temps,  apres 
execution  des  trots  premiers  sons.  Ce  retard  tient  au  fait  que  1'execution  du  programme 
ne  peut  continuer  tant  qu'une  place  ne  s'est  pas  liberee  dans  la  file. 

Le  BASIC  possede  un  mecanisme  d 'interruption  assez  similaire  a  celui  qu'utilisent  les 
commandes  AFTER,  EVERY  ou  ON  BREAK  GOSUB.  fl  donne  acces  a  un  sous-pro- 
gramme d'emission  sonore  qui  n'est  appele  que  lorsqu'une  place  se  libere  dans  la  file 
demandee.  En  voici  un  exemple  : 

10  a  =  0 

20  ON  SQQ)  GOSUB  1000 

30  PRINT  a; 

48  SOTO  30 

1000  a=a+10 

1010  SOUND  l,a,230 

1020  IF  a<200  THEN  ON  SQU)  GOSUB  1000 

1030  RETURN 

run 


Ce  programme,  comme  vous  pouvez  Ie  constater,  n'effectue  jamais  de  pause.  La  com- 
mande SOUND  n'est  appelee  que  si  la  file  d'attente  du  canal  A  {numero  1)  contient  une 
place  libre,  ce  que  la  commande  ON  SQ{1 )  GOSUB  est  chargee  de  verifier  a  la  ligne 
20.  Cette  commande  initialise  un  mecanisme  d'interruption  qui  appelle  le  sous- 
programme  sonore  lorsqu'un  espace  libre  apparait  dans  la  file.  La  commande  ON  SQ 
GOSUB  doit  etre  reinitialisee  apres  appel  du  sous-programme,  ce  que  fait  la  ligne 
1 020.  Dans  notre  exemple,  le  sous-programme  sonore  se  reinitialise  tant  que  «  a  »  est 
inferieur  a  200. 
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II  est  possible  de  demander  a  I'ordinateur  de  jouer  une  musique  de  fond  tout  en  executant 
un  programmme  complet  (deplacement  d'objets  a  1'ecran,  calculs  etc ;...)•  H  suffit  pour  ce  a 
de  faire  jouer  les  notes  par  un  sous-programme  qui  sera  appele  seulement  lorsque  !a  nle 
d'attente  comportera  une  place  libre.  Le  programme  n'effectuera  jamais  de  pause  en 
attendant  qu'une  place  se  libere.  En  fournissant  les  notes  a  ce  sous-programme  sous 
forme  d'instructions  DATA,  il  serait  tres  simple  de  lui  faire  cesser  de  se  remitiahser  juste 
avant  de  lire  la  derniere  donnee. 

Le  nombre  place  entre  les  parentheses  de  la  commande  ON  SQ(  }  GOSUB  est  1,  2  ou 

4  selon  le  canal  dont  la  file  d'attente  doit  etre  solhcitee. 

II  existe  une  fonction  SQ(  )  permettant  d"interroger  fetal  d'un  canal  sonore  donne 
qu'on  designera  de  meme  par  le  nombre  1,2  ou  4.  Cette  fonction  restitue  un  nombre  dont 
chaque  bit  porte  une  signification  el  dont  Interpretation  necessite  quelques  connaissan- 
ces  des  nombres  binaires.  Les  bits  contenus  dans  les  valeurs  obtenues  ont  la  signification 
suivante : 

BIT        DECIMAL         SIGNIFICATION 

0,1,2  1,2,4  Nombre  de  places  libres  dans  la  file 

3'  '  b'  '  Rendez-vous  avec  A  pour  la  note  en  tete  de  file 

4  i6  Rendez-vous  avec  B  pour  la  note  en  tete  de  file 

5  32  Rendez-vous  avec  C  pour  la  note  en  tete  de  file 

6  64  File  bloquee 

7  128  Une  note  en  cours  d'execution 

Voyons  un  exemple  tres  simple : 

1(8   SOUND    2,200 

28   x*S8<2> 

30    PRINT    BIN*(x> 

run 

Le  nombre  binaire  obtenu  (1 O0OO1 00)  contient  le  bit  7  indiquant  que  le  canal  etait 
en  activite  au  moment  ou  la  fonction  SQ  a  etc  utilisee.  Les  trois  dermers  chiffrcs  (100) 
correspondent  au  nombre  decimal  4 :  il  reste  done  quatre  places  libres  dans  la  file.  Cette 

fonction  permet  dc  connaitre  I'etat  d'une  file  a  un  point  donne  du  programme,  alors  que 
ON  SQ(  )  GOSUB  interrogecelui-ci,  puis  reagiten  consequence  a  un  moment  imprevi- 
siblc. 

Les  exemples  cites  jusqu'a  present  ne  prevoyaient  remission  que  d'une  voire  deux  notes 
a  la  fois.  Nous  allons  maintenant  considerer  la  possibilite  de  manier  des  ensembles  de 
notes  independantes  les  unes  des  autres  (un  morceau  de  musique,  par  exemple)  en  les 
entrant  sous  forme  d'une  commande  DATA  lue  (READ)  par  la  commande  SOUND, 
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10  FOR  octave*-!  TO  2       -.<3**Ml»H*lWib«iwv 
20  FOR  x  =  I  TO  7: REM  notes  par  octave  ':  "•'"V;' 
30  READ  note 

40  SOUND  l,note/2Toctave 
50  NEXT 
60  RESTORE 
70  NEXT 

80  DATA  426,379,358,319,294,253,239 
run 

Notre  dernier  exemple  de  programme  sonore  montre  ce  qu'il  est  possible  de  realiser  a 
partir  de  ces  elements.  Un  rythme  et  une  melodic  sont  joues  sur  les  canaux  A  et  B 
synchronises  au  moyen  de  rendez-vous.  L'exempfe  montre  comment  introduire  dans  une 

intruction  DATA  des  informations  concemant  les  notes,  les  octaves,  les  durees  et  les  ren- 
dezvous : 

10  REM  liqne   190  donne  la  clef  de  SOL 

20  REM  ligne  200  donne  la  clef  de  FA 

30  DIM  gammed  12): FOR  xX=l  TO  12;READ  qtmel  (xX)  :NEXT 

40  calXMtREAD  cal*!ca2"/.  =  l:READ  ca2$  a 

50  cls  ■  ■■;„■ 

60  vitX=12 

70  gamme*="  a-b  b  c+c  d-e  e  f+f  g+g" 

80  ENV  1,2,5,2,8,-1,10,10,0,15 

90  ENV  2,2,7,2.12,-1,10,10,0,15 

100  ENT  -1,1,1,1,2,-1,1,1,1,1 

110  DEF  FNm*(5*(5}=MIDt(s$,5,l) 

128  cal'4=l :  GOSUB  200 

130  ca2X=l; GOSUB  380 

140  IF  calX+ca2X>0  THEN  140 

150  END 

160    DATA    &777,&70c,&6a7,!<6471fc5ed,fc598 

170    DATA    4547,  &4fc,fc4b4,  4470,  &431,fc3M 

180   DATA   4cr4f4fHlglal-b2c2Hg2glal-b6a2crlflolal-blal-b2c2 

9*a*9*Ugla2g2f6e2c2e2c2g2e2cl-bl«292He4d8c4f3nc2iJ4-b2fr2- 
b2a2g2f 6e2gr 

4c4-blalH-blg2c2-b4a4g4{r6a2a2-b4b2ar2-b2a2g2Ue2g4c4-blaH 
I~blg2c2-b4a4g8f . 

190    DATA   r4f4f8f4e4c4fr8f4e2f2e4d2e2d8cBc6e2f4a4g8e4f3flc4dr 

8g4cr4e4c6f2d4c4c8fr8-e4dr8g8c4e4c6^2d4c4c8f. 

200  REM  envoi    le   son   sur    le   canal    A 

210    pl*=FNm*(cat*,ealX) 

220    IF    pltO-r"    THEN    rU=0;SOTO    240 

230  r  1X=  16:  ca  tX=calXH:pl$=FNfit$(cal*,calZ) 
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240  IF   pl*="."    THEN   ca tX»0i RETURN   ELSE    LIX'VALtpl*) 

250  caU=caU+t 

•260  nl*=FNm*< calf, cam 

278  cal7.=calX  +  l 

2B0  IF  nlt='+"  OR  nl*="-°  THEN  350 

290  nl*="  "+nl$ 

300  nd  1X=(1  +  1NSTR  (gamine*,  LOWER*  (n  1  $>)  )/2 

310  IF  ASC(RIGHT$(niS, 1) ) >96  THEN  olX=8  ELSE  olX=16 

320  SOUND  l+rl7.,gaMe7.(ndl7.)/an,vitX*I17.,  1, 1 

330  ON  SOU)  GOSUB  200 

340  RETURN 

350  ni$=nl$+FNm$(cal*,cal7.) 

360  cal7.-cal7.+  l 

370  GOTO  300  . 

380  REM  envoi  le  son  sur  le  canal  B 

390  p2$=FNm*(ca2$,ca2X) 

400  IF  p2*<>"r"  THEN  r27.=0:GOTO  420 

410  r2X=8:ca2X=ca27.+l:p2*=FNm*(ca2*,ca2X) 

*-;   420  IF  p2*  =  "."  THEN  ca7.=0;  RETURN  ELSE  127.*VAL(p2*! 

-;'-    430  ca27.=ca2V.+  l 

.-,  .   440  n2*=FNm$(ca2*,ca27.) 

450  ca27.=ca27.+  l 

460  IF  n2S="+"  OR  n2*="-"  THEN  530 

470  n2*="  "+n2$ 

480  nd27.=  (l  +  INSTR  (gamine*,  LGWER*(n2$) ) )  12 

490  IF  ASC  (RIGHT*  (n2$,  I  >  )  >96  THEN  o2V.*4  ELSE  a2X=B 

500  SOUND  2+r27.,gamifie7.lnd27.)/o27.,  vitXU2X,0,2 

510  ON  3Q(2)  SOSUB  380 

520  RETURN 

530  n2*=n24+FNm*(ca2*,ca2X) 

540  ca27.=ca27.tl 

550  GOTO  480 

run  ■::,;•: r. f-.»fi ft ■.  h.;:  -.:.  ■,-  ■■■      /:■■;«:/? 

Si  nous  parlions  graphiques  ? 

La  partie  qui  suit  est  consacree  aux  fonctions  graphiques  de  1'AMSTRAD  664,  dont  nous 

alions,  a  partir  d'un  premier  exemple,  decouvrir  tour  a  tour  les  points  essentiels. 

Nous  alions  commencer  par  partager  Pecran  en  deux  :  une  fenetre  de  texte  (tigne  40)  et 
une  fenetre  graphique  (ligne  30).  Puis  nous  choisirons  tin  MODE,  ainsi  que  deux  cou- 
leurs  clignotantes  (ligne  20). 
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10  REM  MASK  et  TAS  dans  les  fenetres 
20  MODE  1 !  INK  2,10,4: INK  3,4,10 
30  ORIGIN  440,100,440,640,100,30(3 
40  WINDOW  1,26,1,25 
50  CLS  2 

En  executant  ce  programme,  vous  allez  voir  apparaitre  un  carre  clignotant  au  milieu  de 
la  moitie  droite  de  1'ecran.  La  ligne  50  attribue  a  ce  carre  I'encre  numero  deux  (bleu  som- 
bre et  rose  alternes).  La  ligne  30  positionne  ie  point  d'origine  des  coordonnees  sur  le  coin 
inferieur  gauche  du  carre  tandis  que  la  commande  MODE  y  place  le  curseur  (X  =  0, 
Y=0).  On  peut  maintenant  tracer  une  diagonale  a  l'aide  de  la  ligne  60  : 

60   DRAW   200,200,3 

Executez  le  programme,  puis  ajoutez  la  ligne  suivante : 

80  MOVE  0,2:FILL  3 

La  ligne  80  pose  le  curseur  graphique  a  Pinterieur  d'une  des  moities  du  carre,  qu'elle 
colore  au  moyen  de  i'encre  3.  Les  limites  de  ce  coioriage  sont  le  bord  de  la  fenetre  (qui 
est  aussi  celui  de  notre  carre)  et  tout  element  graphique  trace  par  le  stylo  graphique  utilise 
(le  3)  ou  pour  lequel  on  a  indique  la  meme  encre  que  celle  du  remplissage  (la  numero  3 
egalement), 

Executez  le  nouveau  programme  : 

Verifiez  ce  qui  a  ete  dit  a  propos  des  limites  du  coioriage,  en  ecrivant  la  ligne  70. 

78   GRAPHICS   PEN    1 
run 

Remarquez  bien  que  si  I'encre  de  la  diagonale  n'etait  pas  la  meme  que  celle  du  coioriage, 
c'est  le  carre  tout  entier  qui  serait  colorie,  ce  que  vous  pouvez  verifier  en  remplacant  FILL 
3  par  FILL  1  dans  la  ligne  80.  Revenez  ensuite  a  I'etat  initial  (FILL  3). 

Dessinons  maintenant  un  cadre : 

100  MOVE  20,20 
110  DRAW  180,20 
„/*■  120  DRAW  180,180 
v"  130  DRAW  20, 180 
140  DRAW  20,20 
run 
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L'encre  1  du  cadre  a  etc  indiquee  par  la  ligne  70.  Si  celle-ci  n'existait  pas,  il  nous  faudrait 
ajouter  l'indication  "  ,1  ",  soit  comme  troisieme  parametre  de  la  commande  MOVE  en 
ligne  1 00,  soit  comme  troisieme  parametre  de  la  commande  DRAW  en  ligne  110.  L'or- 
dinateur  saurait  alors  qu'il  lui  faut  changer  de  stylo  graphique. 


Du  point  a  la  ligne... 

Une  ligne  peut  etre  pleine,  on  en  pointilles.  La  commande  MASK  permet  de  determiner 
la  taille  des  pointilles.  On  definit  pour  cela  une  sequence  se  reproduisant  tous  les  hutt 
pixels  et  se  poursuivant  ainsi  de  ligne  en  ligne.  II  est  possible  de  revemr  au  debut  de  cette 
sequence  par  I'intermediaire  d'une  nouvelle  commande  MASK  reprenant  les  memes 
para  metres. 

La  sequence  est  representee  au  moyen  d'un  octet  dont  la  disposition  interne  determine 
I'emplacement  de  l'encre.  Nous  utiliserons  dans  notre  exemple  un  nombre  binaire 
constant  (indique  par  le  code  &X)  pour  definir  un  segment  dont  seuls  les  quatre  pixels 
centraux  seront  dessines,  les  deux  pixels  de  chaque  extemite  n'apparaissant  pas.  Cette  dis- 
position nous  donncra  une  suite  de  tirets  de  quatre  pixels  espaces  de  quatre  pixels.  Voici 
la  ligne  qui  aoeomplit  ce  prodige  : 

90    MASK    U11U08 
run 

Mais  pourquoi  ce  programme  ne  respecte-t'il  pas  la  sequence  choisie  lorsqu'il  trace  un 

coin  ?  Tout  simplement  parce  que  !e  coin  est  trace  deux  fois  :  en  tant  que  dernier  point  et 
premier  point  des  lignes  qui  le  composent.  On  peut  contourner  ce  probleme  comme  ceci : 

115  MOVE  160,22 

125  MOVE  178,180 

f    135  MOVE  28,178 
run 

On  obtient  bien  l'effet  desire,  mais  il  y  a  beaucoup  plus  simple.  Si  Ton  ajoute  a  la  com- 
mande MASK  un  second  parametre  "  ,0  ",  l'ordinateur  ne  trace  pas  le  premier  point  de 
chaque  ligne.  Corrigeons  alors  la  ligne  90  : 

98   MASK   «.0»1 1 1 108 ,  0 

...et  effacons  les  lignes  que  nous  veniohs  d'ajouter  en  entrant : 

U5 

125 

135 
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Le  cadre  trace  en  pointilles  par  notre  programme  a  maintenant  un  aspect  symetrique.  Si 
le  second  parametre  de  MASK  etait  fixe  a  "  ,1  ",  la  commande  tracerait  a  nouveau  le 

premier  pixel  de  chaque  ligne. 

Mais  regardez  de  plus  pres  Ies  espaces  separant  les  tirets  :  ceux  du  triangle  inferieur  ont 
quelque  chose  de  plus  que  ceux  de  triangle  superieur.  II  s'agit  du  papier  graphique  auquel 
la  commande  CLG  2,  ligne  50,  a  attribue  l'encre  2.  L'encre  2  etant  aussi  la  couleur  du 
fond,  le  papier  graphique  est  invisible  dans  le  triangle  superieur.  Modifions  done  la  ligne 
50: 

50    CLG    2:GRAPHICS   PAPER   <D 

...et  faisons  toumer  le  programme :  la  couleur  du  papier  se  detache  maintenant  tout 
autour  du  cadre. 

On  peut  egalement  choisir  un  papier  graphique  « transparent  » si  Ton  desire  que  les  espa- 
ces d'une  ligne  pointillee  laissent  transparaitre  le  trace  sous-jacent.  On  obtient  un  trace 
transparent  en  ajoutant  a  la  commande  GRAPHICS  PEN  le  parametre  "  ,1  "  (le  para- 
metre "  ,0  "  nous  ramene  au  trace  opaque).  Modifiez  done  la  ligne  70  : 

70  GRAPHICS  PAPER  1,1 
run 

...et  voyez  le  resultat. 

Sur  la  position  du  curseur  graphique,  il  est  non  seulement  possible  de  tracer  des  lignes  ou 
des  points,  mais  aussi  d'inscrire  du  texte.  Cette  caracteristique  permet  de  positionner  les 
caracteres  avec  une  bien  plus  grande  precision  (a  un  pixel  pres,  au  lieu  de  huit)  et  de  les 

agrementer  en  jouant  sur  les  differents  modes  d'encre  graphique  (voir  plus  haut). 

Pour  ecrire  sur  1'ecran  graphique,  positionnez  d'abord  le  curseur  a  1'endroit  ou  devra  se 
trouver  le  caractere  de  gauche,  puis  entrez  la  commande  TAG  (ou  TAG#1 ,  2  etc...  selon 
le  canal  desire)  suivie  des  commandes  PRINT  usuelles.  Le  curseur  graphique  se  deplace 
automatiquement  de  8  pixels  vers  la  droite  a  chaque  caractere  trace.  Essayez  vous-meme  : 

160   MOVE   64,108 

170   TAG 

t80    PR!NT"SALLY" 

190    TAGOFF 

run 

mttSmminSu-  •■:        nnitav  ■-. 

Bien  que  les  messages  emis  par  le  BASIC  s'affichent  sur  la  fenetre  de  texte  sans  tenir 
compte  de  l'indicateur  TAG/TAGOFF,  il  est  bon  de  s'habituer  a  annuler  la  commande 
TAG  des  que  Ton  n'a  plus  besoin  d'elle. 
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Mais  que  representent  ces  fleches  a  droite  du  nom  ?  Ce  sont  les  symboles  du  retour  chariot 
CHR5(1 3)  et  du  changement  de  Iigne  CHR$(10).  Le  logiciel  graphique convertit  les  32 
premiers  caracteres  ASCII  sous  leur  forme  visualisable,  comme  s'ils  etaient  diriges  sur  la 
fenetre  texte  precedes  de  CHR$(1 ).  La  raison  en  est  que  ces  32  caracteres  de  controle  ne 
sont  utiles  qu'a  Pinterieur  de  la  fenetre  texte.  Dans  le  meme  ordred'idees,  aucun  bouclage 
du  texte  n'est  prevu  Iorsqu'on  depasse  la  marge  droite  de  la  fenetre  graphique. 

Pour  eviter  l'affichage  des  symboles  de  retour  chariot  et  de  changement  de  ligne,  on  a 

recours  au  point-virgule  a  la  fin  de  la  commande  PRINT : 

160    PRINT"SALLY"} 
run 

Le  texte  dirige  sur  une  fenetre  graphique  est  conditionne  par  les  commandes 
GRAPHICS  PEN  regissant  le  trace  de  lignes.  Nous  trouvant  sous  la  commande 
GRAPHICS  PEN  1,  le  nom  est  done  ecrit  en  mode  transparent.  Si  nous  passons  a  la 

commande : 

150    GRAPHICS   PEN    t,0 

:■         run 

...nous  aurons  de  nouveau  le  papier  opaque,  tandis  que : 

150   GRAPHICS   PEN   8,1 
run 

...ecrira  avec  l'encre  numero  0  (transparente). 

Executez  maintenant  le  programme  apres  avoir  efface  la  ligne  150.  Vous  remarquez 
alors  que  le  stylo  graphique  a  retrouve  l'encre  numero  1  +  le  mode  transparent  indiques 
en  ligne  70. 


Les  caracteres  tTansparents 

II  est  possible,  au  moyen  de  certains  codes  de  controle,  d'ecrire  sur Tecran  de  texte  en 
caracteres  transparents.  Ajoutez  au  programme  les  lignes  : 

200   PRUT    #2,CHR$(22);CHR»(1) 

210    LOCATE    #2,32,U:PR1NT    #2,  "»$*»*»" 

220  LOCATE  #2, 32, 14: PRINT  #2," " 

230  PRINT  #2,CHR«(22);CHRS(0) 
run 

La  ligne  200  etablit  le  mode  transparent  sur  le  canal  #2.  Vous  pouvez  constater  que  le 
soulignement  apparait  «  par  dessus  »  les  asterisques  :  il  est  done  possible  de  superposer 
plusieurs  caracteres,  meme  de  couleur  differente.  La  ligne  230  annule  le  mode  transpa- 
rent et  le  canal  #2  revient  done  au  mode  opaque. 
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Les  modes  d'encre 

II  existe  un  mode  d'encre  graphique  permettant  1'interaction  entre  Venae  utilisee  et  celle 
qui  se  trouve  deja  sur  l'ecran.  L'ordinateur  calcule  alors  pour  chaque  pixel  une  encre 
resultante  obtenue  par  combinaison  logique  des  deux  encres  (stylo  ou  papier)  utilisees 
On  dispose  ici  des  operateurs  logiques  XOR,  AND  et  OR.  Le  mode  d'encre  peut  etre 
defini  soit  par  le  quatrieme  parametre  des  commandes  DRAW/DRAWR 
PLOT/PLOTR  ou  MOVE/MOVER,  soit  en  ajoutant  a  la  commande  PRINT  la 
sequence  de  controle  CHR$(23) ;  CHR$(<mode>).  Dans  tous  lescas,  1  correspond  a 
XOR  (OU  exclusif),  2  a  AND  (ET)  et3  a  OR  (OU).  La  valeur  O  retablit  le  mode  normal, 
dans  lequel  la  nouvelle  encre  utilisee  apparait  « telle  quelle  ». 

On  verra  dans  l'exempie  qui  suit  une  utilisation  de  I'operateur  XOR.  Cet  operateur  a  la 
propnete  de  restituer  I'image  originale  lorsqu'on  trace  deux  fois  le  meme  motif  et  est  done 
souvent  employe  avec  la  tortue  graphique.  Vous  constatez  par  ailleurs  que  le  sous- 
programme  tracant  le  carre  est  execute  deux  fois  (lignes  110  et  130),  ainsi  que  la  com- 
mande PRINT  associee  a  TAG  (ligne  170  et  190).  La  commande  FRAME  provoque 
un  temps  d'attente  suffisamment  long  pour  nous  permettre  d'observer  PefTet  produit. 
Remarquez  que  les  commandes  de  la  ligne  90  permettent  de  se  dispenser  du  premier 
parametre :  celui-ci  reste  par  defaut  a  sa  valeur  anterieure. 

Le  troisieme  parametre  de  la  commande  MOVE  (ligne  220)  donne  a  la  commande 
GRAPHICS  PEN  la  valeur  1,  qui  se  substitue  a  la  valeur  3  fixee  en  ligne  60.  Le  mode 
XOR  est  etabli  par  le  quatrieme  parametre  de  la  commande  DRAWR  (ligne  230). 
Remarquez  la  encore  le  parametre  absent. 

On  peut  faire  reapparattre  I'image  recouverte  en  annulant  la  commande  MASK  (ligne 
90).  Vous  voyez  egalemcnt  que  les  coins  du  carre  ont  disparu  :  en  effet,  apres  avoir  ete 
traces  deux  fois  (a  la  fin  d'une  ligne  et  au  commencement  d'une  autre),  ils  ont  ete  annule 
par  Poperation  XOR. 

10  REM  modes  d'encre  XOR 
20  MODE  1: INK  2, 10: INK  3,4 

30  ORIGIN  440,100,440,640,100.300  f 

40  WINDOW  1,26, 1,25 

50  CLB  2:GRAPHICS  PAPER  0 

60  DRAW  200,200,3 

70  MOVE  2,0:FILL  3 

80  ORIGIN  440,0,440,640.0,400 

90  GRAPHICS  PEN  , isMASK  ,0 

100  FOR  y  =  60  TO  318  STEP  2 

110  SQSUB  220 


120  FRAMEtFRAHE 
130  GOSU'd  220 
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140  NEXT 

150  TAB 

160  FOR  y  =  60  TO  318  STEP  2 

170  HOVE  96,y:PRINT  CHR*(224); 

180  FRAME: FRAME 

190  MOVE  96,y:PR!NT  CHR*(224)j 

200  NEXT 

210  END 

220  MOVE  90, y, 1 

230  DRAWR  20,8, , 1 

240  DRAWR  0,20 

250  DRAWR  -20,0 

260  DRAWR  0,-20 

270  RETURN 

run 


Inanimation  graphique 

II  est  possible,  en  modifiant  les  couleurs  affectees  aux  encres,  d'obtenir  un  effet  d'anima- 
tion.  L'eflfet  de  mouvement  est  ainsi  cree  alors  que  le  contenu  de  la  memoire  d'ecran  reste 
inchange.  Un  exemple  duplication  de  cc  procede  se  trouve  d'ailleurs  dans  le  programme 
de  «  Bienvenue  »  de  votre  disque-svsteme  maitre  (vous  pouvez  assister  a  cette  demonstra- 
tion en  lancant  la  commande  RUN  "disc").  Cependant,  Feffet  de  «  palette  chgno- 
tante  »  utilise  dans  cet  exemple  est  insuffisant  lorsque  les  formes  successives  constituant 
l'animation  doivent  se  chevaucher.  Le  programme  qui  suit  inscrit  les  chiffres  1  a  4  sur 
I'ecran  a  1'aide  d'encres  combinees  entre  ellcs  par  i'operateur  OR.  Le  programme  deter- 
mine par  balayage  le  graphisme  des  caracteres  affiches  dans  le  coin  infeneur  gauche  de 
I'ecran,  puis  le  reproduit  sous  forme  aggrandie.  Les  nombres  successifs  sont  ecnts  en 
combinant  les  encres  1,  2,  4  et  8  en  mode  OR.  On  a  eu  ici  recours  a  une  sequence  de 
caracteres  de  controle  (ligne  50). 

Les  lignes  160  et  suivantes  font  tourner  la  palette  en  accord  avec  une  formule  mathema- 
tique :  les  nombres  reproduits  en  graphique  sont  alors  affiches  un  par  un.  Le  choix  de 
I'encre  se  fait  en  examinant  tour-a-tour  chacune  d'entre  elles  pour  determiner  si  elle 
contient  la  sequence  binaire  donnee  :  le  nombre  3,  par  exemple,  est  dessine  avec  Tenure 
numero  4.  Pour  le  faire  apparaitre,  il  faudra  done  rendre  visibles  toutes  les  encres  dont  le 
numero  contient  4  en  binaire,  e'est-a-dire  : 

4(0100),5(0101),6(0110),7(0111),12(1100),13(1101),14{1UO),15{1111). 

Dans  une  application  pratique,  les  encres  modifiees  a  chaque  stade  de  l'animation 
seraient  calculees  a  I'avance,  si  bien  qu'on  pourrait  accelerer  la  partie  de  ce  programme 
comprise  entre  les  lignes  180  a  200. 
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10  REM  animation  par  les  couleurs 

20  ON  BREAK  GOSUB  220 

30  FOR  i=l  TO  IS: INK  i ,26:NEXT 

40  mm  =  l:m(2)=2:m(3)=4!m(4)=B 

50  MODE  0:PRINT  CHR$  (23)  ;  CHR$  (3)  ',  :  TAG 

60  FOR  p  =  l  TO  4 

70  GRAPHICS  PEN  m  <  p  > , 1 

80  LOCATE  #1,1, 25: PRINT  1 1  ,CHR$ (48+p) ; 

90  FOR  x=0  TO  7 

100  FOR  y=0  TO  14  STEP  2 

110  IF  TEST(>;l4,y!=0  THEN  140 

120  MOVE  (x+6!*32,  <y+6)*16:PRINT  CHR$(143); 

130  MOVE  <x+6)t32,ty+71»14iPRINT  CHR$(143)j 

140  NEXT  y,x,p 

150  LOCATE  #1,1,25:PRINT#1,"  "; 

160  FOR  p=l  TO  4 

170  FOR  i=l  TO  25:FRAHE:NEXT 

180  FOR  i=0  TO  15 

190  IF  (i  AND  <n(p))=0  THEN  INK  i,0  ELSE  INK  i,26 

200  NEXT  i,p 

210  GOTO  160 

220  INK  1,26 

run 


Plans  colores 

L'exemple  precedent  nous  a  montre  comment  animer  a  l'aide  des  changements  de  couieur 
des  graphiques  traces  avec  les  encres  I,  2  et  8.  On  peut,  avec  les  memes  encres  et  en  utili- 
sant  les  couleurs  differemment,  creer  un  effet  completement  different  appele  «  plans  colo- 
res ».  En  voici  un  exemple  : 

10  REM  Montagnes 

20  DEFINT  a-z 

30  INK  0,1: INK  1,26  . 

40  INK  2,6:1NK  3,6 

50  FOR  i=4  TO  7:  INK  i , 9: NEXT 

60  FOR  i=B  TO  15: INK  j,20;NEXT 

70  MODE  0:DEG:OR1GIN  0, 150:CLG: MOVE  0,150 

80  FOR  x=16  TO  640  STEP  16 
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'.'■ .  i  ii  ©eS  ?a«gil)  StO  notional  d  sobe  R&ml  A  Ksaofch  ;',"iis  rar.r 

,    ..,,  .-.  .....    ,,,,!„,;,  i-..-.  ?I.;,,.„  .f   .;^  -if  ,j-f.  w?l:::-  ,■    -.■  ■  .-■  ,;???~;:'  ..      .■ 

90    DRAW    x,CQS<x)U50+RNDI100,4 
100   NEXT 

110  MOVE  0, 0: F  ILL  4 
120  cx=175:G0SU8  -320 
130  cx=525iG0SUB  320 

140  SYMBOL  252,0,8lfcC)tlF,l(3B,li7F,*FF 
150  SYMBOL  253,0,6,?<£,«(F2,2,*<F2,StFE 
160  SYMBOL  254,0,&60,&70(&7F,*7F,&7F,(<7F  " 
170  SYMBOL  255,0,  0,0,  kF8,  «<EC,  &FE,  &FF 
180  pr*=CHR*(254)+CHR$(255) 
190  pl*=CHR*(252)+CHR$(253) 
200  TAG:t!=TII1E 
210  FOR  x  =  ~32  TO  640  STEP  4 

220  x2-(<60B-x)*2>MOD  640: hi =RND* 10: hr  =  50*SIN  (x ) 
230  GRAPHICS  PEN  8,1: MOVE  x , 1 00+hr , ,3i PRINT  pr*j 
240  GRAPHICS  PEN  2,1:M0VE  x2,  115+hi ,  ,  3:  PRINT  pU; 
250  IF  (T£ST(x2-2, 115+hl-t2>  AND  8>=8  THEN  380 
260  IF  TIME-t!<30  THEN  260 
270  FRAMEst!=TIME 

280  GRAPHICS  PEN  7,1: MOVE  x ,  100+hr, , 2; PRINT  pr$; 
290  GRAPHICS  PEN  13,1: MOVE  x2,  1 15+hl , , 2: PR1 NT  pi*; 
300  NEXT 
310  GOTO  210 
320  MOVE  ex , 100 
330  FOR  x=0  TO  360  STEP  10 

340  DRAW  cx+SIN(x)*50+10IRND,100+COS(x)*25+10*RND,l 
350  NEXT 

360  DRAW  cx,100jMOVE  cx, 90;F ILL  I 
370  RETURN 
380  ENT  -1,1,1,1 
390  SOUND  1,25,400, 15,, l, 15 
400  FOR  y=100+hr  TO  -132  STEP  -2 
■ji    410  GRAPHICS  PEN  7,  Is  HOVE  x,y,,2;PRINT  pr*j 

420  GRAPHICS  PEN  8, 1 : MOVE  x , y-2, , 3: PRINT  pr*} 
430  NEXT 
440  GOTO  70 
run 

La  encore,  Ie  fonctionnement  de  ce  programme  repose  sur  la  forme  binaire  du  numero 
d'encre.  Tous  les  numeros  d'encre  comprenant  le  bit  «  8  »  (2J)  (de  15  a  8)  sont  sur  bleu 
sombre.  Les  numeros  d'encre  contenant  le  bit  «  4  »  (22)  sont  sur  vert.  Les  encres  2  et  3, 
contenant  chacune  le  bit  «  2  »  (21)  sont  sur  rouges,  et  l'encre  1  (2°),  pour  finir,  est  sur 
blanc  brillant,  l'encre  0  restant  bleue. 
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Les  formes  graphiques  sont  placees  a  1'ecran  selon  la  fonction  OR  (lignes  230  a  240). 
La  couleur  affich.ee  est  determinee  par  le  bit  de  poids  fort  resultant  sur  chaque  pixel.  Une 
image  situee  sur  un  plan  a  bits  de  poids  fort  est  done  toujours  predominate ;  1'arnere 
plan  ne  disparait  pas  et  redevient  visible  Iorsque  cette  image  est  effacee.  Pour  effacer  une 
image,  on  utilise  le  mode  d'encre  AND  avec  les  encres  7, 1 1, 13  ou  14  a  la  place  des  encres 
8,  4,  2  et  1  respectivement  (lignes  280  et  290). 


Les  graphiques  exploitant  la  memoire  supplementaire 

Pour  conclure  ce  chapitre,  voici  un  programme  graphique  complet.  «  Salut  l'artiste  », 
exploitant  les  derniers  64  K.o  de  memoire  RAM. 

10  'SALUT  L'ARTISTE  PAR  DAVID  RADISIC 
20  '  copyright  (c)  AMSOFT  1985 

30  '  , 

40  'N'oubliez  pas  de  *aire  RUN  "bankman"    avant  de  lancer 

le  programme  !  __ 

50  '»i> ti(»i»tJtim»u« »mmmm»m»jm 

60  ' 

70  ON  ERROR  GOTO  2740 

80  DEFINT  a-x  n>  t_ 

90  MODE  l:ch  =  127:c«ind=l:pn(B)=0:pn(l)=26!pn(2>M5:pn<3)«6:pn 

(4)=0spn=l:narx=l:menust:zzzsHIMEM 

100  DIM  command*(22) 

110  norx*(0)  =  "NORMAl"snorx*(l)=',XOR  H:norx«<2)«"transp"!nor 

x  S  ( 3 )  =  "  X  0  R   " 

120  RESTQREsREAD  cmnds*  ( 1 )  ,ctnnds*  (2)  :c«ind*=CHR*  ( 1 6)  +CHR*  (&7F 

)+cfflnds*(l)+cmnds*(2) 

130    READ   cmno:F0R    i  =  l    TO   cuincuREAD   command*  ( i ):  NEXT 

140   READ    st*i  IF   st*<>"*t"    THEN   cmnd*  (cmnd )  =  st$;cmnd=cinnd  +  l  !6 

OTO  140 

150  WINDOW  «B. l,4B,l,3sPAPER  *0,0:PEN  *8,1:CLS  »0 

160  WINDOW  #1,1,48, 4, 4sPAPER  #l,3;PEN  #t,l:CLS  #1 

170  ORIGIN  0,0,0,640,0,334 

180  x=320:y=200:MOVE  x,y 

190  BORDER  pn(4);F0R  i=0  TO  3s  INK  i,pnU);NEXT 

200    MASK.    255,0;PAPER    0:PEN    UPAPER    #l,3sPEN    #1 , 1  sGRAPH  ICS    PE 

H   pn,norx  ■'  >••! 

210  IF  f lag<>5  THEN  280  ■■■  ..'u 
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220  IF  pn<2  THEN  pnt*=CHR* (248) : px= <pn  +  l ) »13  ELSE  IF  pn<4  TH 
EN  pnt*£CHft*(24l)ipx=tpn-l)*13  ELSE  pnt*=CHR* (243) s px=37 
230  LOCATE  px,2;PR!NT  pntf; 
240  LOCATE  1,1; PRIMT  USING  "   pen  0  :  fttt   pen  i  s  ##";pn<8 

)ipn<l)j 

250  LOCATE  29,2:PR1NT  USING  "border  :  ##";pn(4) 

260  LOCATE  1,3:PRINT  USING"   pen  2  :  ##   pen  3  ;  ##";pn<2> 

i  pn (3) ; 

270  LOCATE  px,2:PRINT  "  "; 

280  LOCATE  #1,1,1:PRINT  •1,USIN6"X  :####  Y  ;####   "jxjy;: 

PRINT  #1 , "MODE  TRACE  i  "  ;norx* (narx+ (undr aw*2) > ; "  "; 

290  IF  *lag=0  THEN  GOSUB  2260 

300  ' 

310  GOSUB  970 

320  ' 

330  IF  flag>8  THEN  390 

340  IF  it=""  THEN  390 

350  cmnd  =  INSTR(ciimd*,i*)  s  I F  cmnd  =  0  THEN  390 

360  IF  cmnd=l  THEN  CLGi x=320: y=200 : GOTO  390 

370  IF  cmnd=2  THEN  RUN  70 

380  ON  cmnd-2  GOSUB  1240,1410,1520,1640,1840,1860,1950,2820, 

2090,2120,2170,2200,2668,2660,2660,2660,2390,2330,2200 

390  IF  tx=0  AND  ty=0  THEN  200 

400  IF  *Ug  >8  THEN  440 

410  GOSUB  630 

420  GOSUB  680:FRAME: GOSUB  688 

430  GOTO   200  .,,,..' 

448    MOVE    tesipx,  tempy,pn,  1 

450    ON    Hag    GOSUB    470,490,550,640  HiS    ■■ 

460   GOTO   200 

470    PLOT    x,y:GOSUB    630.-PLOT    x,y 

480   RETURN 

490    DRAW    tempx+x , tempyiDRAW   tempx+x , tenpy+y 

500    DRAW   tempx,teflipy+y)DRAW   tenipx ,  tenipy 

510    GOSUB    630 

520  DRAW  tempx+x, te«py:DRAW  tempx+x , tempy+y 

530  DRAW  tempx , tempy+y: DRAW  tempx, tempy 

540  RETURN 

550  MOVE  tefflpx,tempy: DRAWR  x,y 

560  IF  triside=0  THEN  580 

570  DRAW  tempxx,  teinpyy:  DRAW  tempx,te«py    «U20  : 
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580  GOSUB  630 

590  MOVE  tenpx, te*py : DRAW  te«px+x , tempy+y 

608  IF  triside=0  THEN  RETURN 

610  DRAW  tempxx,tempyy:DRAW  teapx  ,  tempy 

620  RETURN 

630  x=x+tx:y=y+ty:RETURN 

640  MOVE  teapx,te<npy:DRAW  x^y 

650  SOSUB  630 

660  MOVE  tempx, tempy : DRAW  x,y 

670  RETURN 

680  '  curseur  trace  &  Hfact  ■ 

670  IF  f lag=5  THEN  RETURN 

700  MASK  255,1 

710  IF  flag  >1  THEN  xx=te*px+x :yy=te«py+y  ELSE  xx=x:yy*y 

720  IF  Hag*4  THEN  xx=x:yy=y 

730  IF  f lag=l  THEN  xx=x:yy=y 

740  IF  undraw*l  THEN  820 

750  GOSUB  790 

760  MASK  255,0 

770  IF  H-"    "THEN  GOSUB  2150;i*="" 

780  RETURN 

790  MOVE  xx-4,yy,pn, 1 ! DRAW  xx+4,yy 

800  MOVE  xx,yy~4:DRAW  xx,yy+4 

810  MOVE  xx,yy,,xorn:RETURN 

820  nx-l:GOSUB  1220 

833  FRAME:GOSUB  1220 

840  IF  i*="  "  THEN  nx=norx : GRAPHICS  PEN  pn,l:GOSUB  1220 

850  i*="" 

860    IF    fliq    <>6   THEN    760 

870    IF    aoved=0    AND    j*<>""    AND     ( j«<CHR«<240)    OR    j*>CHR$ (247! ) 

THEN  ch=ASC(j*) imoved=l 
880    IF   feaved=0    THEN   RETURN 
890    LOCATE    5,2 
900  FOR   i=ch-5   TO  ch+5 
910    PEN    ABS(iOch)  +  l 

920    ch$=CHR$(l)+CHR$(ABSa+256)M0D    256) 
930    IF    ch"i    THEN    PRINT    "    "ch*"    ";ELSE    PRINT   ch$} 
940    NEXT 

950  PEN  1 : PRINT  "  =  "ch"  "; 
960  GOTO  760 

970    ty=0:tx=0:GOSUB    680: FRAME: GOSUB   680 
980    IF    INKEY(0K>-1    OR    INKEY<72><>-1    THEN    ty=16 
990    IF    IMKEY(2X>-1    OR    INKEY(73K>-1    THEN   ty=-16 
1000    IF    INKEY(8X>-1    OR    INKEY(74)<>-1    THEN    tx=-16 
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IBIB  IF    INKEYCDO-l    OR    INKEY <75)< >-i    THEN   tx=16 

1020  IF    INKEY<21)<>-1    OR    INKEY<76K>-1    THEN    tx*tx/8: ty=tv/S 

1B3B  if    tx-0    AND    tv=B   THEN   »iovet}=0   ELSE    nioved  =  l 

1040  j$=INKEY$:i*=UPPER*(j«)  „„ 

1050  IF  <i*="  "  OR  i*=CHR»<13)  >  AND  Haq>0  THEN  1098 

1060  IF  Uag=5  THEN  1120 

1070  IF  Hag  =  6  THEN  1170 

1090  ON  fiaq  GOSUB  1240,1418,1640,1860,1950,2820 

1100  i*="" 

1110  RETURN 

1120  IF  moved=0  THEN  RETURN         ,,„..,,  T.,r»,    aoc/ 

1130  IF  tx>2  THEN  pn*(pn+l!  MOD  5  ELSE  IF  tx<-2  THEN  pn=ABS( 

i  1AB  *  IF  tv>2°THEN  on  (pn) ■ (pn (pn)  +  1 )  NOD  27  ELSE  IF  ty<-2  THE 
N  pn(pn)=ABSUpn(pnXl)>»27-i+pn<pn) 

1150  GRAPHICS  PEN  pnsPEN  II, pn 

1160  tx  =  0:ty  =  0:BORDER  pn <gn) I  RETURN 

1170  IF  tx<0  THEN  ch=ABS(ch+255>  MOD  256 

1160  IF  ty<0  THEN  ch=A8S (ch+246)  MOD  256 

1190  IF  tx>0  THEN  ch=(ch+l)  MOD  256 

1200  IF  tv>0  THEN  ch=(ch+10)  MOD  256 

1210  tx=0:ty=0;RETURN  „-,,«' 

1220  TAGsMOVE  xx-8,  yy+6,pn,  nx'.PRINT  CHRt  tch> j  :TAGQFF 

1230  RETURN 

1240  '  C 

1250  IF  Hao  =  l  THEN  1290 

1260  ro=t:GQSU8  2240 

1270  tempx=x:  terapy=y: +1 aqal 

1280  RETURN  nit 

1290  IF   tefnpx  =  x    AND   teapy-y   THEN    1390 

1310  tix=MAX<x!tempx)-MIN<tempx,x):tiy*NAXCy,tMpy>-MIN<te«p 
y,yi 

1320  ti=SQR<(tixT2)+<tiyt2)) 

1330  ORIGIN  tempx.tempy 

1340  PLOT  0,0,pn,0:MOVE  0,-ti 

1350  FOR  s=0  TO  PII2+0.01  STEP  PI/tti/2» 

1360  DRAW  SlN(z+Pl>*ti,COS(z+PI)tti,pn,norx 

1370  NEXT  2 

1380  ORIGIN  0,0 

1390  x=terapx:y=!te«pY:teflipx  =  0:tei*py=8MUg  =  B 

1400  RETURN 
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1^10   B  .mi  m   ;-.      ■-:    M   SiSi 

1420  IF  Hag  =  2  THEN  1470  •■**,*«  :  .        .- :  - '  <r«l 

1438  ro=2:G0SU8  2240  '"  -  ■'■■               ?? 

1440  tempx+x:  te(tpy=y:+"lag=2  .? 

1450  x=0:y=0  ■  j 

1460  RETURN  -.*: 

1470  IF  norx  =  l  THEN  1500  -.-Si 

1480  MOVE  terapx  ,  teflipy :  DRAH  tempx+x  ,  tempy , ,  norx  "'<■' 

1490  DRAW  tempx  +  x,  tempy+y:  DRAW  teapx ,  teitpy+y:DRAW  tempx,te«p 

y 

1500  x=tempx: y=tewpy : f lag=0 
1510  RETURN 

1520  '  F  ycil 

1530  ro=3:G0SUB  2240  ■:*.*} 

1540  60SUB  1620; IF  i**"    "  THEN  1680                       r-  tl 

1550  edgecol=VAUl«)  .->.-.  tt 

1560  ro=4:Q0SUB  2240  ;.^1{ 

1570  GQSUB  1620:  IF  i*="  "  THEN  1600                    '■:■;/ 

1580  filler=VAL(i$!  ,  f 
1590  MOVE  x,y,edgecol:FILL  filler 

1600  flag=0:i*=""  ;  i 

1610  RETURN  -i 
1620  i*=INKEY$!lF  li$<"0"OR  i$>"3")  AND  i*<>"  "  THEN  1620   '.1 

1630  RETURN  VI 

1640  '  T  .    ■■} 

1650  IF  Hag  =  3  THEN  1700  ■  " ; 

1660  flag=3!ro=5:GQSUB  2240  ,  II . 

1670  tempx-x : tempy=y  ;Si 

1680  x=0:y=0  "I 

1690  RETURN  n:j 

1700  IF  triside<>0  THEN  1770  ;S1 

1710  ro=6;G0SUB  2240  ■  3U 

1720  MOVE  0,0:pn,l:GOSUB  590  ::.C1 

1738  tempxx=tempx+x: te«pyy=tempy+yjx=x/2:  y=20  .  ,y 

1740  triside=l  n 

1750  GQSUB  550:GOSUB  590  ■  .  ■;  I 

1760  RETURN  -tl 

1770  IF  narx  =  l  THEN  1800  .".r.' 

1780  MOVE  te(spxx,tempyy,  ,norx:DRAW  teipx,tenpy  ,rd 

1790  DRAW  tempx+x, terapy  +  y: DRAW  tetnpxx ,  tempyy             '11 

1800  tempxx  =  0!teipyy=0  ■  ■?{ 

1810  x=tefltpx :  y-tempy:  triside=0  ■'■''? 

1820  teinpx=0:  te«py=0;  f  1  ag*0  : 
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1830  RETURN 

1848  '  3 

1850  norx«liundraw"uridran  XOR  ltRETURN 

1860  '  L 

1870  IF  flaqM  THEN  1910 

1880  ro=7:GOSUB  2240 

1 890   tempx=x:  teispy  =  Yi  fl  ag=4 

1900    RETURN 

1910  IF  norx=l  THEN  1930 

1920  MOVE  tempx, terapy, ,narx;DRAW  x,y 

1930   x  =  tempx;y=tedipy:  Hag=0 

1940  RETURN 

1950  '  I 

1960    IF   flag=5   THEN   f  Ug=0sCLSi  INK   3,  tupcol  i  INK   pn,  col :  GOTO 

1990 

1970   CLS:Haq  =  5:B0RDER   pn(pn) 

1980    RETURN 

1990  FOR  i=0  TO  3:INK  i , pn (i ): NEXT i BORDER  pn(4) 

2800  IF  pn=4  THEN  pn=l 

2010  CLSjRETURN 

2B20  '  A 

2030    IF    flatpi    THEN    2870 

2840   tempx-0: tempy=8:CLS 

2050  undraw=l:Hag  =  6i  narx  =  l :  •oved»l 

2060  RETURN 

2070  flsg=0 

2080  RETURN 

2090  '  N 

2100  norx=0 

2110  RETURN 

2120  '  E 

2130  GRAPHICS  PEN  pn, 0: TAG: MOVE  xx-8, yy+6, , 0: PRINT  "  "pTAGQ 

FF 

2140  RETURN 

2150  '<ESPACE> 

2160  PLOT  x,y,pn,norxsRETURN 

2178  '  X 

2180  norx=l 

2190  RETURN 

2280  '  M  -.*    ¥■.  ■ 

2218  menu=menu  MOD  2+1 

2220  GQSUB  2260:RETURN   •*  ' 

2230  i*=UPPER*(INKEY*):IF  i$=""  OR  INSTR (ser *, i t) =0  THEN  223 

0  ELSE  RETURN 
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2240  CLS:undraw=0:PRINT  c«nd$ (ra> ;; LOCATE  1,3iPRINT  "(espace 

>  ";:IF  ro=3  OR  ro=4  THEN  PRINT  "Pour  Sortir" 

2250  RETURN 

2260   CLSifUg=-l 

2270  FOR  i  =  l  TO  LEN(c«tnds*  (*enu) ) 

2280  ps  =  i+ABS(menu-2!*LEN(cdtnds*(l) ) 

2290  PEN  1 s  PRINT  "< "MI D* (cmnds* (menu) , i ,  1  > " >"MID« (comnand* (p 

s),2,4>"  "; 

2300  NEXT 

2310  PRINT  "<CLR>   <DEL>   <EBPA>" 5 

2320  RETURN 

2330  '  S 

2340  GOSUB  2460:  IF  Hlenaae$  =  "n  TKEN  2370 

2350  GOSUB  2558 

2360    SAVE    filename*, b,J<C000,M000 

2370  GOSUB  2268 

2380  RETURN 

2390  '  R 

2400  GOSUB  2460! IF  f i lenant*"""  THEN  2440 

2410  GOSUB  2730 

2420   LOAD    filename$,«<C80B 

2430  GOSUB  2570 

2440  GOSUB  2260 

2450  RETURN 

2460  CLS: LOCATE  10,3: PRINT  "<RETURN>  pour  annuler!"; 

2470  LOCATE  1,1:PRINT  "  NQM  du  DOSSIER  :  "  5 

2480  INPUT  "".filename*! IF  filenaae*=""  THEN  RETURN 

2490  n  =  INSTR(Hlena«e*,"."):IF  n  =  0  THEN  2520 

2500  IF  n=l  THEN  2460 

2510  Hlename*=LEFT*  (HI  enamel,  n-1) 

2520  f ilenaffle*  =  LEFT$(-filename$,8!+".scn" 

2530  CLS  fcj*  i" 

2540  RETURN 

2550  FOR  1=0  TO  4:POKE  feC000+i ,pn<i ) :NEXT 

2560  RETURN 

2570  FOR  i  =  0  TO  4:pn(i)=PEEK  <&C000+i)  HOD  27:NEXT 

2580  cn=0:FOR  i=0  TO  2:  IF  pnU  )=pn  (i  +  1)  THEN  cn=cn  +  l 

2590  NEXT:  IF  cn  =  3  THEN  2630 

2600  FOR  i=0  TO  3: INK  i ,pn < i > : NEXT 

2610  BORDER  pn (4) : pn=  1 : GRAPH ICS  PEN  pn 

2620  RETURN 

2630  pn(0>=0:pn(l)=26:pn(2)  =  15:pn(3)=6spn<4)M 

2640  GOTO  2608 

2650  '  1.  2,  3,  %  4 
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2660  CLS:PRINT  "Desirez  vous   <S>tocker": PRINT  TAB  (16) "<R>t 

trouver";PRINT  TA6U3)"ou  <E>changer  l'ecran?" 

2670  ser$="SRE"+CHR«(13):GQSUB  2230;  IF  i*=CHR»(13)  THEN  2260 

2680  bnk2=(cmnd-13) : bnk 1=1 

2690  IF  i*  =  "S"  THEN  CLS:60SUB  2550: 1 SCREENCOPY, bnk.2,bnk  1 

2700  IF  i*="R"  THEN  SQSU8  2730:  i SCREENCOPY, bnk 1 ,bnk2 : GQSUB  2 

570 

2710  IF  i$="E"  THEN  CLSsGQSUB  2730sGOSUB  25501 i SCREENSWAP, bn 

k2,bnkl:B0SUB  2570 
2720  GQSUB  2260:RETURN 

2730  FOR  i=0  TO  3s  INK  i ,  GiNEXT:  BORDER  0.-RETURN 
2740  CLS:GOSUB  2600:R£SUKE  2260 
2750  DATA  "CBFT3LI ANEXM" , " 1234RSM" 

2760  DATA  1 ?, CERCLE,  "BOITE" , "FILL  ", TRIANGLE, ALTERNE, "LIGNE" 
,"INKS  ", ASCII, NORMAL, EFFACER, "XOR   \"HENU  ","Ler   ","2eae 
","3eme  ",4e 

me  ".RETROUW'SAUV  "."MENU  " 

2770  DATA  CERCLE. BOI TE, COULEUR  BORD,COULEUR  DU  FILL, TRIANGLE 
1, TRIANGLE  2fLIGNE,t* 

Les  deux  commandes  RSX  de  ce  programme.  I  SCREENCOPY  ct  I  SCREENSWAP. 
soril  fournies  par  Tutilitaire  «  BANK  MANAGER  ».  stockc  sur  la  face  1  d'une  des  dis- 
quetles  systeme.  Files  faciliteni  la  copie  cl  I'echange  des  ecrans  entre  les  zones  de  memoire 
appropriees  et  entre  les  deux  parties  de  64  Ko  de  memoire. 

Vous  devcz  done  executer  lutililaire  «  BANK  MANAGER  »  AVANT  de  lancer  ce  pro- 
gramme el.  pour  ce  faire,  inserer  la  face  1  d'une  des  disquettes  systeme,  avanl  de  taper  : 

run   "bankman"      ,i11(D.  , . .  -;isq,-.. 

.g  -,,  ■ 
Vous  pouvez  alors  lancer  «  Salut  1'artiste  ». 

Et  apres  ? 

Apres  lancement  de  BANK  MANAGER,  suivi  de  celui  du  programme  graphique,  vous 
voyez  apparaitre  un  menu  d'options.  ainsi  qu'un  curseur  graphique,  cligrtotant  au  centre 
de  l'ecran. 


Avosheuresdeloisir...  Chapitre9    Page  63 


II  ne  vous  feste  plus  qu'a  appuyer  sur  la  lettre  qui  vous  interesse  (C  pour  cercle,  par  exem- 
ple)  pour  executer  l'option  desiree. 

A  titre  de  demonstration,  tapez  : 

C  ■, 

Appuyez  sur  la  touche  flechee  vers  le  haut  <>,  jusqu'a  ce  que  le  curseur  graphique  s'eleve 
d'environ  trois  centimetres  au-dessus  du  centre  de  I'ecran. 

Appuyez  enfin  sur  la  barre  d'espacement  pour  executer  le  cercle.  Le  menu  reapparait 
ensuite  a  I'ecran. 

Tapez  M,  pour  Menu,  pour  passer  a  un  menu  intermediaire  qui  vous  permettra  de 
<S>auvegarder,  de  <R>etrouver  vos  ecrans,  ainsi  que  de  manipuler  le  contenu  des 
ecrans  <1>,  <2> ,  <3>  et  <4>  {stockes  dans  la  deuxieme  partie  de  la  memoire). 

Pour  exploiter  ces  fonctions  d'eeran,  tapez  le  numcro  dc  memoire  correspondant  (1 , 2,  3 
ou  4).  Vous  obtenez  alors  un  nouveau  menu. 

II  vous  propose : 

S  pour  sauvegarder  I'ecran 

R  pour  retrouver  I'ecran 

E  pour  echanger  des  ecrans 

[ R ETU R N ]  pour  arreter  l'operation  en  cours. 

Si  vous  desirez,  par  exemple,  sauvegarder  I'ecran  courant  dans  la  memoire  numero  2, 
tapez  2  suivi  de  S. 

Lorsque  vous  revenez  au  menu  intermediaire  (apres  <  R >estitution,  < S> auvegarde  ou 
manipulation  d'un  ecran),  retapez  M  pour  revenir  au  menu  de  depart. 

«  Salut  Fartiste  »  vous  permet  de  dessiner  des  cases,  des  cercles,  des  triangles,  des  lignes, 
de  placer/deplacer  des  points,  de  colorier  des  zones  et  de  dessiner  des  caracteres. 

Lorsqu'un  ecran  est  termine,  il  peut  etre  sauvegarde  sur  disquette  a  l'aide  de  l'option 

<S>auvegarde  du  menu  intermediaire  pour  visualisation/modification  ulterieure,  et 
rappele  a  I'ecran,  a  tout  moment,  par  l'option  <R>etrouver. 


Nous  void  a  la  fin  du  dernier  chapitre  de  ce  manuel,  Apres  utilisation,  ana- 
lyse et  experimentation  des  programmes  presentes  dans  ce  guide,  vous  devez 
main  tenant  avoir  assimile  le  BASIC  AMSTRAD  et  le  6128. 
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Pour  en  savoir  plus ... 

Vous  desirez  en  savoir  davantage  sur  le  6128,  le  BASIC,  les  microprogram- 
mes,  le  systeme  Sexploitation  CPjM  et  le  Dr.  LOGO  ?  Consul tez  les  nom- 
breuses  publications  AM  SO  FT  et  les  autres  ouvrages  dispombles  sur  le 
marche. 

Pour  conclure,  nous  vous  proposons  4  annexes  comprenant :  le  con t rat  d'u li- 
gation des  logiciels,  un  glossaire  de  termes,  quelques  programmes  de  jeux 
et  un  index  complet  du  manuel. 

Nous  esperons  que  cette  lecture  vous  a  ete  profitable  et  vous  remercions 
d'avoirfait  confiance  a  AMSTRAD. 
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Annexe  1 

Contrat  d'utilisation  des  logiciels  «««u  s 

Digital  Research  &  AMSTRAD 

NOTICE  A  LIRE  ATTENTIVEMENT  PAR  L'UTILISATEUR 


N'OUVREZ  PAS  VOTRE  PROGICIEL  AVANT  D'  A  VOIR  LU  CE 
CONTRAT.  L'OUVRIR  IMPLIQUE  VOTRE  ACCORD  AVEC  LES  CONDI- 
TIONS ET  LES  LI  MITES  D'UTILISATION  DEFINIES  CI-DESSOUS. 


1.  Definitions 

Dans  ce  contral,  Ie  terme  : 

1.  DRI  signifie  DIGITAL  RESEARCH  (CAL1FORNIE)  INC,  proprietaire  des  droits 
d'auteur  et  des  brevets  des  programmes. 

2.  Machine  signifie  le  micro-ordinaieur  sur  lequcl  vous  utilise?  Ie  programme.  Les  syste- 
mes  a  plusieurs  micro-ordinateurs  requierent  I'obtention  de  licences  supplementaires. 

3.  Programme  signifie  l'ensemble  des  programmes,  de  la  documentation  et  du  materiel 
s'y  rapportant.  ainsi  que  toutes  les  annexes  et  les  mises  a  jour  qui  pourraient  vous  etre 
foumies  par  DRI,  quelle  que  soit  Tutilisation  que  vous  en  faites  ou  les  modifications 
que  vous  y  apportez. 

4.  AMSTRAD  signifie  AMSTRAD  CONSUMER  ELECTRONICS  PLC,  Brentwood, 
ESSEX. 

Vous  assumez  )a  pleine  responsabilite  du  choix  dc  votre  programme,  de  sa  mise  en 

;     service,  de  son  utilisation  et  des  resultats  qui  en  decouleront. 
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2.  Licence  gfehigol  mb  HOft&eifhil  I:  O 

Vouspouvez:  \J  :  /■     jjfa   *•:  ■'■>)!    }|',        ' ; v.t 

1.  Utiliser  le  programme  sur  une  seule  machine. 

2.  Copier  le  programme  sur  support  magnetique  ou  sur  papier  pour  ia  duplication  ou  la 
modification  du  programme  dans  le  cadre  de  l'utilisation  sur  une  seule  machine.  Vous 
pouvez  faire  jusqu'a  trois  copies  pour  les  raisons  invoquees  ci-dessus.  Certains  pro- 
grammes pourront  cependant  etre  concus  afin  de  limiler  ou  meme  d'empecher  toute 
copie.  lis  sont  alors  reperes  en  consequence  par  la  mention  «  copy  protected  » (protege 
a  la  copie).  La  copie  de  la  documentation  est  intcrdite.  Le  desassemblage  est  interdit. 

3.  Modifier  le  programme  et/ou  l'incorporer  a  un  autre  programme  pour  votre  propre 
usage  sur  une  machine  unique.  (Toute  partie  du  programme  incorporee  a  un  autre 
logiciel  continuera  a  etre  sujette  aux  conditions  du  present  contrat). 

4.  Ceder  le  programme  et  sa  licence  a  un  tiers,  a  condition  de  notifier  a  DRI  le  nom  et 

1'adresse  de  ce  tiers  sous  reserve  que  cc  tiers :  a)  accepte  les  conditions  de  licence,  b) 
signe  et  envoie  a  DRI  une  copie  de  la  carte  d'enregistrement  et  c)  paye  les  taxes  de 
transfert.  Si  vous  cedez  le  programme,  vous  devez  soit  en  ceder  toutes  les  copies 
(imprimees  comme  magnetiques)  y  compris  Foriginal,  soit  detruire  tout  ce  qui  n'a  pas 
ete  cede.  Ceci  inclut  toutes  les  modifications  et  portions  de  programme  contenues  ou 
fusionnees  dans  d'autres  programmes. 

Vous  devez  reproduire  et  joindre  a  toutes  copies/modifications  etc.,  la  notice  concer- 
nant  les  droits  de  reproductions  reserves. 


CHAQUE  DISQUETTE  POSSEDE  UN  NUMERO  DE  SER1E  ET  VOUS  NE 
DEVEZ  NI  UTILISER.  Nl  COPIER,  Nl  MODIFIER,  NI  CEDER  A  UN  TIERS 
LE  PROGRAMME  OU  UNE  COPIE,  UNE  MODIFICATION  OU  UNE  PAR- 
TIE  FUSIONNEE  DU  PROGRAMME,  SAUF  DANS  LES  CONDITIONS 
PREVUES  PAR  CE  CONTRAT.  SI  VOUS  CEDEZ  UNE  COPIE,  UNE  MODI- 
FICATION OU  UNE  PARTIE  FUSIONNEE  DU  PROGRAMME,  VOTRE 
LICENCE  EST  AUTOMATIQUEMEN T  ANNULEE. 


Annexe  1    Page  2  Comrat  d'utilisation  dies  logiciels 


3.  Echeances  >;  <*f  jpfg^t^gsW*  *W*^  & 

Votre  licence  est  valable  jusqu'a  son  angulation.  Vous  pouvez  cependant  y  mettre  fin  a 
tout  moment  en  detruisant  le  programme  ainsi  que  toutes  ses  copies,  modifications  et 
parties  fusionnees.  II  prend  egalement  fin  sous  certaines  conditions  citees  plus  loin  daris 
ce  texte,  ou  si  vous  ne  respectez  pas  les  clauses  du  present  contrat.  Vous  devez  dans  ce 
cas  detruire  le  programme  ainsi  que  toutes  ses  copies,  modifications  et  parties  fusionnees. 


4.  Limites  de  garantie 


LE  PROGRAMME  EST  LIVRE  TEL  QUEL.  NI  DRI,  NI  AMSTRAD  NE 
GARANTISSENT,  SOUS  QUELQUE  FORME  QUE  CE  SOIT,  EXPLICITE- 
MENT  OU  IMPLICITEMENT  Y  COMPRIS  LES  GARANTIES  IMPLICITES 
A  TOUT  ACHAT  DE  MARCHAND1SE,  NI  LE  PROGRAMME,  NI  SON 
APTITUDE  A  ACCOMPLIR  UNE  TACHE  PARTICULIERE.  LE  RISQUE, 
TANT  DU  POINT  DE  VUE  DE  LA  QUALITE  QUE  DES  PERFORMANCES 
DU  PROGRAMME,  EST  ENTIEREMENT  VOTRE.  SI  LE  PROGRAMME 
SE  REVELE  DEFECTUEUX.  TOUTES  LES  CHARGES,  REPARATIONS 
OU  CORRECTIONS  SONT  A  VOS  FRAIS. 


Ni  DRI,  ni  AMSTRAD  ne  garantissent  que  les  fonctions  contenues  dans  ce  programme 
vont  correspondre  a  vos  besoins  ni  que  leur  deroulement  s'effectuera  sans  interruption 
ou  sans  erreur.  AMSTRAD  garantit  cependant  que  la  disquette  sur  laquelle  se  trouve  le 
programme  est  sans  defaut  et  de  bonne  facon,  en  conditions  normales  d'utiiisation,  pour 
une  periode  de  90  jours  a  partir  de  la  date  d'achat  (attestee  par  une  photocopie  de  votre 
recu). 


5.  Limites  des  recours 

Si  votre  disquette  est  defectueuse,  AMSTRAD  s'engage  a  la  remplacer  dans  les  limites 
de  garantie  indiquees  ci-dessus,  sous  reserve  que  vous  la  retourniez  accompagnee  de  la 
photocopie  de  votre  regu. 


EN  AUCUN  CAS,  NI  DRI,  NI  AMSTRAD  NE  SERONT  RESPONSABLES 
DES  PREJUDICES  CAUSES,  Y  COMPRIS  LES  PERTES  EN  GAIN,  LES 

PERTES  EN  PROFIT  OU  LES  DOMMAGES  1NDIRECTS,  MEME  SI  DRI 
OU  AMSTRAD  ONT  ETE  AVISES  DE  LA  POSSIBILITE  DE  TELS  PREJU- 
DICES. 
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6.  Carte  d'enregistrement 


•SSftttSH: 


DRI  se  reserve  le  droit  de  mettre  a  jour  ses  programmes  de  temps  en  temps.  Les  mises  a 
jour  vous  seront  fournies  seulement  dans  le  cas  ou  une  carte  d'enregistrement  dument 
signee  a  ete  retournee  au  siege  de  DRI.  DRI  n'est  en  aucun  cas  tenu  de  faire  ses  mises  a 
jour,  ni  de  vous  les  envoyer. 


7.  Generalit.es 

Vous  ne  pouvez  ceder  ni  transferer  la  licence  ou  le  programme,  sauf  specification  expresse 
du  contrat.  Tout  tentative  de  cession  de  la  licence,  ou  de  transfert  des  droits,  annule  le 
contrat. 

Le  contrat  est  regi  conformement  aux  termes  de  la  loi  britannique. 

Pour  tout  renseignement,  contacted  DRI,  a  1'adrcsse  suivante :  Digital  Research  Inc., 
P.O.Box  579,  Pacific  Grove,  California  93950. 


CE  CONTRAT  NE  POURRA  ETRE  MODIFIE  QUE  PAR  UN  AMENDE- 
MENT  ECRIT  FAIT  PAR  UNE  PERSON  NE  AUTORISEE  DAMSTRAD  OU 
DE  DRI.  TOUTE  MODIFICATION  APPORTEE  PAR  ORDRE  D'ACHAT, 
DE  PUBLICITE  OU  AUTRE  REPRESENTATION  NE  SERA  PAS 
VALABLE. 

VOUS  RECONNAISSEZ  QUE  VOUS  VENEZ  DE  LIRE,  DE  COM  PRENDRE 
ET  D'AGREER  AUX  TERMES  ET  CONDITIONS  DE  CE  CONTRAT.  VOUS 
RECONNAISSEZ  PAR  AILLEURS  QUE  LES  CLAUSES  CI-PRESENTES 
CONSTITUENT  LA  TOTALITE  DU  CONTRAT  ETABL1  ENTRE  VOUS, 
DRI  ET  AMSTRAD  QUI  ANNULE  TOUTE  PROPOSITION  OU  ACCORD 
PREALABLE.  ORAL  OU  ECRIT,  ENTRE  VOUS,  DRI  ET  AMSTRAD  ET 
FAIT  AUTORITE  EN  MATIERE  DE  CONTRAT. 

CE  CONTRAT  N'INTERVIENT  PAS  SUR  VOS  DROITS  STATUAIRES. 
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Annexe  2 

Petit  dictionnaire  (frangais  et  anglais)  *)*»«* 

A  Uintention  des  utilisateurs  du  CPC6128 


Acces  direct 

Mode  d'acces  permettant  de  lire  ou  d'ecrire  une  information  en  memoire  ou  sur  disquette 
dans  n'importe  quel  ordre. 


Accumulateur 

Emplacement  memoire  dans  le  microprocesseur  qui  retient  temporairement  les  donnees 
a  manipuler.  Note  :  tres  employe  en  langage  machine.  Les  utilisateurs  du  BASIC  n'ont 

pas  besoin  de  savoir  qu'il  existe. 


Adresse 

Numero  utilise  dans  unc  instruction  et  qui  specifie  remplacement  d'une  «  cellule  »  dans 
la  memoire  dc  I'ordinatcur, 


Algorithme 

Nom  pompeux  designant  une  formule  ou  une  somme  complexe ;  e'est  aussi  une  sequence 
d'operations  arithmetiques  qui  effectue  une  tache  precise. 


Alimentation 

Designe  la  source  d-'energie  d'un  systeme  ainsi  que  i'electronique  necessaire  a  l'alimenta- 

tion  correcte  des  circuits. 


Alphanumerique 

Qualifie  des  chiffres  et  des  lettres,  par  opposition  aux  caracteres  graphiques. 


Petit  dictionnaire 
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Amorce  (Boot  ou  Boostrap)    ^BW wff)  OTf BllffO! * '.  "  >*T 

Sequence  d'instructions  qui  permet  Pintroduction  d'un  programme  en  memoire  ROM, 
initialisant  ainsi  le  processus  de  chargement  a  un  emplacement  memoire  precis.  Note :  on 
parle  aussi  d'amorcage. 


AMSDOS 

Amstrad  Disk  Operating  System  :  systeme  d'exploitation  Amstrad  permettant  au  BASIC 

d'acceder  a  une  ou  plusieurs  disquettes. 

AMSOFT  '",'" 

Division  logicielle  d'AMSTRAD  qui  s'occupe  surtout  de  concevoir,  d'organiser  et  de 
publier  tout  ce  qui  est  necessaire  a  votre  6128  et  a  ses  nombreuses  possibility  d'exten- 
sion. 


A/N 

Voir  Analogique 


Analogique  (Analog  en  anglais) 

Qualifie  une  grandeur  qui  ne  presente  aucune  discontinuity,  ni  dans  le  temps  ni  en  ampli- 
tude. Note  :  l'ordinateur  ctant  par  essence  un  appareil  numcrique,  il  doit  done  etre  muni 
de  convertisseurs  A/N  (analogique/numerique)  pour  analyser  des  grandeurs  analogiques. 


Animation 

Effet  de  «  dessin  anime  »  qui  se  produit  lorsque  l'ordinateur  deplace  des  elements  graphi- 
ques,  donnanl  ainsi  Pillusion  du  mouvemenl. 


Architecture 

Organisation  materielle  de  l'ordinateur  et  de  ses  peripheriques,  qui  permet  d'etablir  les 

relations  avec  le  bus  de  donnees,  les  echanges  internes  ou  externcs,  etc. 
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Argument  ri  ■     ■ 

Terme  mathematique  designant  une  variable  independante.  Par  exemple,  dans  I'expres- 
sion  x  +  y  =  z.  x  et  y  sont  les  arguments. 

ASCII  .iv*-  -mrY-   -    iitfflbsObsfc"     .-!RniH}fl'>a 

Code  quasiment  universel  qui  permet  de  representer  les  nombres,  lettres  et  autres  symbo- 
ls obtenus  a  partir  du  clavier  ou  d'un  autre  type  de  commande. 

Assembleur 

Methode  pratique  dc  programmation  en  code  machine,  ou  les  instructions  en  code  sont 
appeices  par  des  mncmoniques  (lettres  qui  suggerent  une  fonction,  ADD  pour  addition 
par  exemple). 


Autonome 

Se  dit  d'un  materiel  lorsqu'il  fonctionne  independamment  de  tout  autre. 

Base 

Premiere  consideration  d'un  mathematicien  quand  il  joue  avec  les  nombres :  en  binaire 
pour  la  base  2,  en  hexadecimal  pour  la  base  !6  et  en  decimal  pour  la  base  10.  Plus  facile 
a  comprendre  pour  les  enfants  que  pour  leurs  parents. 

Base  de  donnees 

Ensemble  de  donnees  ayant  des  liens  entre  elles,  pouvant  aller  du  simple  fichier  a  une 
organisation  complexe  dc  dossiers  relies  les  uns  aux  autres. 

BASIC 

Langage  simplifie  de  programmation  dont  l'appellation  provient  de  1'anglais  Beginners 
All-Purpose  Symbolic  Instruction  Code.  Note  :  il  permet  une  programmation  interactive 
et  a  ete  concu  pour  un  apprentissage  facile.  On  peut  essayer  un  programme  a  tout 
moment  alors  que  pour  les  programmes  compiles  (voir  ce  mot)  on  doit  d'abord  appeler 
le  compilateur. 
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BAUD  ^ 

Unite  de  mesure  du  passage  des  donnees  dans  une  transmission  en  serie  egale,  la  plupart 
du  temps,  au  nombre  de  bits  par  seconde. 

BCD  (Binary  Coded  Decimal  =  Decimal  Code  Binaire  -  DCB) 

Systeme  permettant  de  coder  les  nombres  decimaux,  chaque  chiffre  etant  represente  par 
un  groupe  de  4  bits. 

BDOS  (Basic  Disk  Operating  System) 

Module  d'exploitation  des  disquettes.  C'est  une  partie  du  CP/M  qui  sert  d'interface  entre 
le  programme  utilisateur  et  les  foncttons  du  CP/M. 


Binaire  (nombre) 

Nombre  represente  en  notation  binaire.  Note :  avec  le  6128  ils  sont  designes  avec  le 

prefixe  &X.  par  exemple  &X0I01  est  egal  au  nombre  decimal  5. 


BIOS  (Basic  Input  Output  System) 

Module  de  gestion  des  entrees/sorties.  II  s'agit  de  la  partie  de  CP/M  dependante  du  mate- 
riel, specialemcnt  ecrite  pour  un  type  d'ordinateur.  Toutes  les  entrees/sorties  (ecran,  cla- 
vier, disquette,  etc..)  sont  gerees  par  le  BIOS. 


Bit 

Information  representee  par  un  symbole  a  deux  valeurs  notees  0  et  I  dans  le  systeme 
binaire,  et  que  I'ordinateur  reproduit  par  des  moyens  electroniques. 


Bit  significatif  :    .s.H 

Nombre  dont  la  signification  n'apparait  qu'en  binaire  et  dont  J'influenoedans  un  octet 
est  preponderante. 


Bogue 

Voir  Bug 
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BOOLE  (Algebrc  de)  ^AD 

Utilisee  dans  les  tables  de  verite,  ou  f  veut  dire  vrai  et  0  signifie  faux. 

Boot 

Voir  Amorce 

Bootstrap 

Voir  Amorce  '■'"■  '   "■ 


Boucle 

(GA'>     >y«3Q  babiA  i9iuqfT<>- 

Procede  de  programmation  au  cours  duquel  I'ordinateur  repete  l'execution  de  plusieurs 

lignes  jusqu'a  ce  qu'une  condition  soit  rcmplie. 


Bruit 

Les  capacitcs  sonores  du  6128  permettent  egalement  d'introduire  un  nombre  variable 
de  bruits  aleatoires  pour  creer  des  effets  sonores,  des  explosions  par  exemple. 


Bug 

En  Anglais  c'est  une  bestiole.  En  informatique,  c'est  ce  qui  fait  qu'un  programme  se 
«  plante  »  :  c'est  Ferreur,  le  pepin,  au  sens  le  plus  large.  En  Francais,  on  a  propose  le 
terme  «  bogue  »  equivalent  de  «  bug  ». 


Bus 


■■ui&J 


Systeme  de  connexions  entre  I'ordinateur.  les  peripheriques  et  le  monde  exterieur  qui 
transporte  1'information  concernant  l'etat  du  microprocesseur.  la  RAM  et  d'autres  ele- 
ments materiel s.  Le  Bus  du  6128  est  la  prise  la  plus  importantc  a  i'arrierc  de  la 

machine. 


Byte 

Voir  Octet 
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CAD 

Voir  CAO 

CAE  **»« 

Voir  EAO 

Canal  (Stream)  nifli 

> 

Voie  de  communication  entre  I'ordinatetir  et  ses  peripheriques  (imprimante,  ecran,  dis-' 
quette,  cassette,  etc.). 


CAO  (Computer  Aided  Design  -  CAD) 

Conception  Assistee  par  Ordinateur.  a  savoir  l'ensemble  des  techniques  informatiques 
utiltsees  dans  les  bureaux  d'etudes  lors  du  processus  de  conception  d'un  produit  nouveau. 


Caractere 

Tout  symbole  qui  peut  etre  representi :  lettres,  chiffres  ou  symboles  de  ponctuation  et 
graphiques  (Annexe  3) 


Caracteres  (chaine  de) 

Ensemble  de  caracteres  utilise  comme  un  tout  pour  permettre  des  traitementset  des  mani- 
pulations de  texte. 


Caracteres  (jeu  de)  .^ 

Toutes  les  lettres,  nombres  et  symboles  disponibles  sur  un  ordinateur  ou  une  imprimante. 
Si  un  caractere  existe  sur  un  ordinateur,  cela  ne  veut  pas  obligatoirement  dire  qu'il  peut 
etre  recu  par  une  imprimante  quelconque. 


/-.'* 
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Cartouche 

Ensemble  de  circuits  integres  specialement  programmes  se  branchant  sur  une  prise  parti- 
culiere  de  Fordinateur.  Note :  Bien  qu'ils  soient  plus  onereux  que  les  supports  magneti- 
ques.  les  progiciels  qu'ils  contiennent  se  chargent  plus  facilement  el  travaillent  plus  rapi- 
dement  que  les  programmes  sur  disquette,  mais  plus  chers  que  les  logiciels  fournis  sur 
disquette. 


Cassette 

Support  de  la  plupart  des  programmes  destines  aux  micro-ordinateurs  familiaux.  Etant 
donne  que  les  fichiers  sont  places  les  uns  apres  les  autres  (en  ordre  sequentiel),  Faeces  est 
plus  lent  que  sur  les  disquettes. 


Catalogue 

Zone  de  la  disquette  ou  sont  notees  les  entrees  de  chaque  fichier ;  une  sorte  de  table  des 

matieres  de  la  disquette. 

CCP  (Console  Command  Processor) 

Logiciel  de  traitement  des  commandes  qui  permet,  apres  que  Foperateur  ait  entre  les  com- 
mandes  au  clavier,  de  les  charger  et  de  les  executer. 


Chaine 

Souvent  sous-entendu  alphanumerique.  Type  de  donnee  comprenant  des  chiffres  et  des 
lettres  ne  pouvant  etre  traitee  comme  une  variable  numerique.  Peut  etre  numerique,  mais 
n'est  consideree  commc  telle  que  si  une  commande  le  precise. 


Clavier 

Serie  de  touches  electroniques  similaires  a  celles  d'une  machine  a  ecrire.  Note  :  il  existe 
plusieurs  types  de  clavier  dont  le  QWERTY,  d'origine  anglaisc,  et  1'AZERTY,  d'origine 
francaise. 


Clavier  numerique 

Partie  du  clavier  regroupant  des  touches  numeriques,  afin  de  faciliter  Fentree  des  donnees 
numeriques,  et  dans  le  cas  du  6128,  des  touches  de  fonction  definissables  par  i'utilisa- 
teur. 
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Code  a  Barres  ■■■•■O 

Code  d'identification  de  produits,  forme  de  barres  noires  plus  ou  moins  espacees  que  seul 
un  dispositif  special  peut  lire.  Note  :  vous  le  trouverez  sur  la  plupart  des  emballages  des 
produits  que  vous  achetez  (lait,  lessive,  biscuits,  etc..) 


Code  Machine 

Langage  de  programmation  qui  est  compris  par  un  processeur,  tbutes  les  coninTatides 

etant  exprimees  en  binaire. 


Commande 

Instruction  que  le  programme  doit  suivre. 

Commande  integree 

Commande  qui  fait  partie  du  systeme  d'exploitation.  Evitant  les  delais  d'acces,  elles  sont 

toujours  plus  rapides  que  les  commandes  residant  sur  disquette. 


Compilateur 

Programme  tres  complexc  qui  transforme  un  programme  en  langage  de  haut  niveau  tel 
que  le  BASIC,  en  un  programme  en  code  machine  directement  executable  par  la  machine, 
done  tres  rapide. 


Coupleur  acoustique 

Dispositif  electronique  qui  comprend,  entre  autres,  un  microphone  et  un  haut  parleur  sur 
lequel  il  est  possible  de  placer  un  combine  telephonique  afin  de  transmettre  des  donnees 
par  ligne  telephonique. 


CP/M  (Control  Program  for  Microcomputers) 

Programme  de  controle  pour  micro-ordinateurs.  Note  :  e'est  un  des  systemes  d'exploita- 
tion pour  disquette  les  plus  repandus,  lance  par  DIGITAL  RESEARCH. 
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CPU  bNnii 

Central  Processing  Unit :  alias  le  «  chef  d'orchestre  »  de  l'ordinateur.  Note  r  on  trouve 
parfois  UCT  en  francais  pour  Unite  Centrale  de  Traitement. 

Crayon  optique 

Crayon  qui  peut  parfois  dessiner  sur  I'ecran  ou  saisir  des  donnees,  telles  que  les  codes  a 
barres.  par  excmple, 

Curseur 

Petit  carre  qui  indique  ou  va  apparaitre  le  prochain  caractere  sur  I'ecran. 

Curseur  graphique 

Curseur  scmblable  a  un  curseur  de  texte,  mais  se  rapportant  a  I'ecran  graphique.  Un 
concept  invisible  sur  le  6 1 28  mais  indispensable  pour  dessiner. 

Decimate  (notation) 

C'est  notre  systeme  a  base  10,  avec  dix  chiffres  de  0  a  9  facile  a  comprendre  pour  nous, 
mais  par  pour  Tordinateur,  qui  ne  sait  compter  qu'en  0  et  1. 

Defilement 

Tcrme  definissant  le  mouvement  ascendant  de  Faffichage  apres  remplissage  de  I'ecran 
jusqu'a  la  derniere  ligne.  permetlant  le  degagement  d'espace  requis  pour  1  entree  ou  la 
sortir  de  nouvelles  informations. 

Delimiteur 

Voir  Separateur 

Demarrage  a  ehaud 

Lorsque  i'on  fait  un  [CTRL]C  sous  CP/M.  Le  demarrage  a  chaud  reinitialise  le  systeme 
d'exploitation  sans  detruire  les  donnees  en  memoire  centrale. 
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Demarrage  a  froid 

II  s'agit  de  I'amorce  et  de  1'initialtsation  d'un  systeme  d'exploitation,  Le  demarrage  a  froid 
du  CP/M  se  fait  par  la  commande  |  CP/M  sous  BASIC. 


Deterioration 

Destruction  ou  alteration  du  contenu  d'un  fichier  sur  disquette  ou  de  la  memoire  de 
raaniere  indesirable  et  irrecuperable. 


Diagnostic 

Message  produit  automatiquement  par  1'ordinateur  pour  indiquer  et  identifier  une  erreur 
dans  un  programme  ou  dans  la  machine  elle-meme. 


Dialogue  ordinateur-peripherique  (Handshaking) 

Sequence  de  signaux  electroniques  generant,  verifiant  et  synchronisant  Ies  echanges  de 

donnees  entre  un  ordinateur  et  un  peripherique  ou  entre  deux  ordinateurs. 


Digitaliseur  (Digitizer) 

Dispositif  permettant  de  convertir  des  informations  de  type  analogique  en  type  numeri- 
que  et  de  les  transmettre  a  un  ordinateur.  U  est  souvent  utilise  avec  les  tables  graphiques. 
Note  :  en  francais  on  trouve  parfois  le  terme  «  numeriseur  ». 


Disque 

Plaque  ayant  une  ou  deux  surfaces  recouvertes  d'un  oxyde  magnetique  et  qui  permet  de 
garder  les  donnees  qui  y  sont  enregistrees  de  maniere  permanente. 


Donnees  exploitables  sur  machine 

Donnees  ou  informations  directement  exploitables  sur  ordinateur  sans  traitement  supple- 
mental a  partir  du  clavier  ou  autre. 


DOS  (Disk  Operating  System  =  systeme  d'exploitation  sur  disque) 
Systeme  qui  gere  Putilisation  des  disques,  les  plus  connus  etant  CP/M,  MSDOS  et  UNIX. 
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Double  face  **.*¥&  w 

Disquette  qui  peut  emmagasiner  des  informations  sur  chaque  face,  ou  unite  qui  permet 
d'avoir  acces  aux  deux  faces  sans  que  Ton  ait  besoin  de  touraer  la  disquette. 


Dr.  LOGO 

Logo  de  Digital  Research.  II  s'agit  d'un  langage  de  programmation  par  lequel  une  tortue 
materialise  le  curseur  graphique. 


EAO  (CAE) 

Enseignement  assiste  par  ordinateur.  Ensemble  des  techniques  et  des  methodes  appli- 
quant  Pinformatique  dans  l'enseignement. 


Editer 

Modifier  un  programme,  des  donnees  ou  un  texte. 

Editeur 

Programme  habituellement  en  ROM  qui  permet  1c  processus  d'editiom 

Editeur  d'ecran 

Editeur  de  texte  ou  de  programme  permettant  le  deplacement  du  curseur  en  tout  point  de 
I'ecran  pour  modifier  les  caracteres  y  figurant. 

Enregistrement 

Ensemble  d'informations  formant  un  tout  logique  et  physiquement  liees  dans  les  opera- 
tions de  transfert  entre  les  supports  externes  et  la  memoire  d'un  ordinateur. 

EPROM  (Erasable  Programmable  Read  Only  Memory) 

Une  PROM  qu'on  peut  programmer  puis  effacer  a  l'aide  d'un  rayonnement  ultra-violet. 
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Erreur  syntaxique  »e'5       ;  ?fl 

Erreur  apparaissant  lorsque  les  regies  du  programme  sont  contrariees  par  utilisation  de 
mots  cles  ou  de  variables  incorrects ;  l'utilisateur  en  est  averti  par  un  message  du  BASIC. 


Expression 

Formule  simple  ou  complexe  qu'on  utilise  dans  un  programme  pour  faire  un  traitement 
sur  des  donnees ;  1'expression  definissant  souvent  le  type  de  donnees  a  manipuler. 


Fichier  (File)  !l 

Fichier,  programme  ou  gfoupe  de  donnees  generalement  stocke  suf  nne  cassette  on  sur 

une  disquette. 


Firmware  (Logiciel  integre,  Microprogramme)  i»tib3 

Logiciel  integre  au  materiel  tel  que  le  BASIC  et  le  systeme  d'exploitation  en  ROSC    *'■' 

Floppy  disk 

Mot  anglais  pour  disquette:    -.  ■    "  iff  W  ';■  .'■■-.   <:'-.^  .?■■  ■ 

Voir  Disque 

Formatage    ■■■■■  :..>.■■:-..-■::■.•  ■-<«:,.,.  ..-^  ^  ^w  ■■■■■ 

Processus  permettant  d'organiser  un  systeme  pour  retrouver  les  fichiers  et  leurs  references 

dans  des  secteurs  particuliers  de  la  disquette. 

Forth 

Langage  professionnel  de  programmaiion  rapidc,  a  mi-chemin  entre  le  haut  niveau  et  le 
code  machine. 

Generateur  de  son 

Partie  de  1'ordinaleur  (soit  un  microprocesseur  soit  un  logiciel)  qui  cree  les  sons  et  les 
bruits. 
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Generations  d'ordinateurs  dfabMm '-» 

Les  avances  technoiogiques  ont  marque  Ies  etapes  de  revolution  des  ordinateurs  et  de 
I'informatique.  La  cinquieme  generation  est  en  gestation,  elle  devrait  permettre  a  un  ordi- 
nateur  de  se  programmer  lui-meme  en  utilisant  1' Intelligence  Artificielle  (voir  ce  terme). 


Graphique 

Representation  plane  d'une  fonction  mathematique :  lignes,  cercles,  diagrammed  etc. 

Graphisme  de  la  tortue 

Quand  la  tortue  se  deplace,  elle  laisse  la  trace  de  son  passage  sur  l'ecran  graphique  de  Dr. 
LOGO. 

Hexadecimal 

Systeme  de  nombres  a  Base  16.  Dans  le  6128  on  les  precise  avec  les  symboles  &  ou 
&H.  (Par  exempie  &FF  =  decimal  255).  Voir  la  premiere  partie  du  chapitre  «  A  vos 
heuresde  loisir... ». 

Horloge  (Clock) 

Pour  la  synchronisation  des  operations  de  1'ordinateur,  horioge  interne  chargee  de  don- 
ner  l'heure  reelle,  la  date,  etc... 

IEEE-488 

Une  des  interfaces  standard  permettant  de  connecter  des  peripheriques  a  un  ordinateur. 

Imprimante 

Dispositif  comparable  a  une  machine  a  ecrire  automatique.  branche  sur  l'ordinateur,  afin 
d'obtenir  sur  papier  les  listings  et  les  textes  desires. 

Imprimante  a  marguerite 

Imprimante  de  tres  bonne  qualite  de  frappe  et  dont  les  caracteres  « trouvent  sur  les  peta- 
les  d'une  marguerite  interchangeable  en  fonction  du  type  d'ecriture  voulu.  Peu  rapiues  et 
bruyantes,  elles  sont  tout  de  meme  indispensables  pour  obtenir  un  courrier  de  qualite. 
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Imprimante  matricielle  mmisnikwt,h  motivmt&i 

Imprimante  avec  une  grille  rectangulaire  de  points ;  la  plupart  des  imprimantes  economi- 
ques  ou  rapides  sont  de  ce  type.  (L'AMSTRAD  DMP1  en  est  une). 


Informatique 

Tout  ce  qui  touche  a  la  manipulation  des  ordinateurs  et  de  Finformation  dans  son  sens 

large. 


Inform  atisation  du  plus  grand  nombre  iortoi  at  $b  .;:.'■  /-js.uj 

Expression  grandiloquente  indiquant  la  mise  de  l'inforfflati$u*fc1»'jJOft<&edc  tous.  ■>:,&$ 

Ingenierie  logicielle 

Expression  grandiloquente  designant  la  programmation  informatique  supposant  une 
approche  structuree  et  reffechie  par  opposition  aux  techniques  arbitraires. 

Initialiser 

Demarrer  un  systeme  ou  un  programme  en  defim'ssant  les  valeurs  initiates  des  variables 
ou  les  caracteristiques  initiales  de  son  fonctionnement. 

Instruction 

Ordre  ou  commande  donnes  a  Fordinateur  pour  qu'il  effectue  une  operation  particuliere. 

Un  ensemble  ou  une  succession  destructions  forment  un  programme. 

Instructions  (Jeu  d') 

Les  procedes  arithmetiques  et  logiques  accomplis  par  le  microprocesseur  composent  le 
jeu  d'instructions.  Une  simple  commande  BASIC  peut  faire  appel  a  des  dizaines 
d'instructions  au  niveau  du  microprocesseur. 

Integration  a  grande  echelle  (Large  Scale  Integration  -  LSI)  nqtnj 

Procede  technique  qui  permet  d'integrer  sur  la  meme  puce  de  silicium  de  plus  en  plus  de 

portes  elementaires  de  logique  binaire. 
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Intelligence  artificielle 

Faculte  d'un  programme  a  apprendre  et  analyser  une  situation  ou  une  tache  precises 

grace  a  ses  experiences  passees. 

nor'    ■ 
Interactif 

Un  systeme  est  dit  interactif  lorsque  I'ordinateur  a  besom  de  reponses  immediates  pour 

continuer  son  programme.  Les  jeux  dependent  du  mode  interactif  car  Taction  du  joueur 
modifie  la  suite  du  deroulement  du  programme.  On  dit  que  I'ordinateur  travaille  en  temps 

reel. 


Interface 

Un  mot  a  la  mode  informatique  pour  designer  un  Hen  (physique  ou  mental)  entre  I'ordi- 
nateur et  le  monde  exterieur,  y  compris  I'utilisateur,  les  interfaces  du  6128  sont  par  exem- 
ple  le  clavier  (entree),  1'ecran  (sortie),  etc... 

Interface  homme-machine 

Jonction  entre  I'ordinateur  et  l'operateur :  clavier,  ecran,  son,  etc... 

Interface  parallele 

Le  6128  en  a  une  pour  1'imprimante :  plusieurs  fils  parallels  transmetttnt  des  informa- 
tions en  meme  temps,  d'ou  I'adjectif  «  parallele  ». 

Interface  serie 

Par  opposition  a  la  precedente,  ne  peut  transmettre  qu'un  bit  a  la  fois  (Tune  maniere 
sequentielle ;  la  plus  commune  est  appelee  RS232. 

Interpreteur  ,  ,  . 

Par  exemplc.  1'interpreteur  du  6128  interprete  le  BASIC  et  le  traduit  en  code  machine, 
ligne  par  ligne.  La  « lenteur  »  du  BASIC  vient  du  fait  qu'il  traduit  la  meme  hgne  plusieurs 
fois  si  elle  est  dans  une  boucle. 
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I/O  gfobltitfs  "•MngHbTn? 

Input/output,  I'equivalent  anglais  des  entrees/sorties. 

Iteration 

Une  des  bases  de  1'ordinateur,  qui  divise  Ie  travail  en  petits  elements  simples  qu'il  repete 
maintes  et  maintes  fois.  C'est  aussi  le  systeme  des  boucles. 

Jeux  d'Arcade  et  d'A ventures 

Entre  les  envahisseurs  de  I'espace  qui  font  zap,  bing  bang  et  les  aventuriers  qui  font  crac, 
boum,  hue,  il  y  en  a  pour  tous  les  gouts.  Les  jeux  d'aventures  qui  melent  le  texte,  les 
graphismes  et  les  contes  de  fees  commencent  a  avoir  leurs  adeptes.  Les  Hobbits  et  le  Sei- 
gneur des  Anneaux  y  cotoient  les  chevaliers  de  la  Table  Ronde. 


Joker 

>oit  *,  soit  ?  Le  Dr.  LOGO  n'accepte  que  le  ?  Le  joker  *  remplace  n'importe  quel  nombre 
ie  ?  lis  sont  utilises  pour  batir  des  noms  de  fichiers  ambigus.  Le  ?  peut  etre  n'importe 
jue!  caractere  alphanumerique. 


Joysticks 

<\Iias  manettes  de  jeux.  Remplace  les  fonctions  des  touches  curseur  pour  une  action  plus 
'apide  dans  les  jeux. 


Un  K,  ou  Ko,  ou  encore  Kilo  Octet,  contient  !024  Octets  (210).  Votre  6128  a  64K  de 

nemoire  Vive,  e'est-a-dire  65536  Octets  (dans  le  genre  13  a  la  douzaine). 


Langage  evolue 

-angage  de  programmation  proche  du  langage  humain,  concu  en  fonction  de  I'applica- 
ion  a  laquelle  il  est  destine  et  qui  est  pratiquement  independant  du  type  d'ordinateur 

imploye. 
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Langage  lie  a  l'ordinateur 

Langage  qui  doit  faire  l'objet  d'un  assemblage  afin  d'etre  converti  en  code  machine  requis 
pour  sa  reconnaissance  et  son  execution  par  un  ordinateur  particulier. 


Langages 

Du  langage  machine,  seul  compris  par  l'ordinateur,  au  langage  de  haut  niveau  comme  le 
BASIC.  Ie  COBOL  ou  le  Pascal,  en  passant  par  les  langages  de  bas  niveau  comme  l'as- 
sembleur  propre  a  chaquc  microprocesscur,  I'informatique  trone  sur  une  tour  de  Babel 
ou  Pascal  (Blaise)  n'y  retrouverait  pas  Descartes  (Rene).  Le  BASIC  a  ses  detracteurs,  sur- 

tout  chez  les  puristes.  mais  domine  neanmoins  la  scene  des  micros. 


Lecture/Ecriture  (Read/Write  -  R/W) 

Qualifie  un  disque,  un  fichier  ou  une  unite  de  disquette  permettant  la  lecture  et  I'ecriture 

des  donnees. 


Lecture  seulement  (Read  Only  -  R/O) 

Option  attribute  a  une  disquette,  a  un  fichier  sur  disquette  ou  a  une  unite  de  facon  a 
proteger  les  donnees  qu'il  ou  qu'elle  contient  d'un  effacement  involontaire. 


LISP  (LIST  PROCESSOR) 

Nom  d'un  langage  de  programmation  fonctionnelie. 

Logiciel  (Software) 

Tout  ce  qui  touche  aux  programmes  et  a  ce  qu'on  met  dans  la  machine  pour  la  faire  tour- 
ner.Sans  lui,  votre  ordinateur  n'est  qu'un  element  decoratif  a  l'esthetique  futuriste. 

Logiciel  integre 

Voir  Firmware  ■'.  j  noqni:;.' 


Logo 

Nom  du  grec  «  logos  »  qui  signifle  «  mot »,  il  est  utilise  dans  le  milieu  educatif  pour 
I'apprentissage  de  la  programmation. 
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Lutin  (sprite)  ■<*.    ■     ~    :  >  kjB  *~i; : 

Caractere  pouvant  se  deplacer  librement  sur  1'ecran  sans  alterer  les  representations 
graphiques  deja  affichees. 


Manette  de  jeux 

Voir  Joystick 

Materiel 

Ensemble  des  elements  physiques  employes  pour  le  traitement  des  donnees. 

Matrice 

Terme  utilise  en  mathematique  et  en  informatique  pour  representer  des  arrangements  de 
variables  dans  plusieurs  dimensions.  Donne  une  grille  de  points  si  on  1'utilise  dans'  le  sens 
physique.  Tous  les  caracteres  sont  definis  sur  des  matrices,  d'oii  le  nom  d'imprimante 
matricielle. 

Memoire 

Un  ordinateur  a  sa  memoire  qui  flanche  (RAM)  et  sa  memoire  ROM  qui  elle,  est  perma- 
nente.  Bien  que  Ton  puisse  a  la  fois  lire  et  ecrire  dans  la  memoire  vive  RAM,  ce  qui  s'y 
trouve  disparaft  quand  on  coupe  le  courant.  On  ne  peut  que  lire  ce  qu'il  y  a  dans  la 
memoire  morte  ROM.  II  y  a  enfin  la  memoire  de  masse,  representee  par  les  cassettes,  les 
disquettes,  disques  durs  qui  sont  des  supports  amovibles  de  l'information  memorisee, 

Memoire  (Implantation) 

L'organisation  de  la  memoire,  montrant  les  differentes  adresseset  aux  fonctions  I'attribu- 
:ion  de  parties  precises  de  la  memoire,  de  gestion  de  I'ecran,  du  systeme  d'exploitation, 
;tc. 

VIemotre  tampon  (Buffer) 

Des  qu'un  ordinateur  communique  avec  un  appareil  plus  lent  que  lui,  il  a  besoin  de  tam- 
x>ns  pour  emmagasiner  les  donnees  au  fur  et  a  mesure  qu'elles  sont  manipulees.  C'est  un 

Doste  de  transit  temporaire,  sur  le  chemin  d'une  imprimante  ou  d'un  autre  peripherique. 
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Menu  wntu- 

Bien  que  ta  cuisine  informatique  n'ait  pas  l'attrait  de  celle  de  Bocuse,  on  utilise  souvent 
des  menus  pour  que  l'utilisateur  choisisse  la  substantifique  moelle.  Autrement  dit  une  liste 
d 'options  qui  s'affiche  sur  l'ecran.  (Un  des  rares  mots  que  les  Anglo-Saxons  nous  aient 
piques  pour  l'informatique). 

Microprocesseur 

Le  cceur  de  l'ordinateur.  Un  processeur  miniaturise  dont  tous  les  elements  tiennent,  en 
principe,  en  un  seul  circuit  integre  qui  execute  les  instructions  que  lui  transmet  I'interpre- 
teur  BASIC. 

Microprogramme 

Voir  Firmware  ,  ')t.P- ' --hL- ",;    «  "■■ 

Mise  au  point 

Elimination  des  defauts  d'un  programme  qui  se  manifestent  par  des  anomalies  de  fonc- 
tionnement. 

Mode  graph  ique 

Les  premiers  micros  avaient  du  mal  a  melanger  texte  et  graphiques.  Le  CPC664  le  fait 

avec  elegance. 

Modem 

Abreviation  de  MOdulateur  DEModulateur ;  on  1'utilise  pour  les  communications  a  dis- 
tance entre  ordinateurs.  Cet  appareil  peut  etre  a  couplage  acoustique  ou  direct.  Voir 
aussi :  coupleur  acoustique. 

Modulateur  RF 

Dispositif  d'encodage  et  de  transmission  des  signaux  video  en  provenance  de  l'ordinateur 
vers  la  prise  d'antenne  d'un  telcviseur  standard. 
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Moniteur  iHisf/ 

Ecran  dedie  d'un  ordinateur,  par  opposition  a  un  ecran  de  television  qui  doit  generale- 
ment  etre  modifie  ou  adapte  pour  afficher  les  images  venant  d'un  ordinateur. 


Nibble 

Voir  Quartet  ."»'■■  -'.:nV! 

N«ods 

Unite  de  stockage  sur  I'espace  de  travail  LOGO,  Un  noeud  type  utilise  4  octets  d'espace 
memoire. 


Nombre  a  virgule  fixe 

Nombre  dont  la  virgule  reste  a  un  emplacement  specifie  fixe  dans  les  representations,  les 

manipulations  et  en  stockage. 


Nombre  reel 

Nombre  compose  d'uH  nombre  entier  et  d'une  partie  decimale. 

Nombre  sans  signe 

Nombre  sans  prefixe  indiquant  si  sa  valeur  est  positive  ou  negative. 

Nombres  entiers 

Nombres  sans  partie  decimale,  par  opposition  aux  reels  constitues  d'une  partie  entiere  et 
d'une  partie  decimale. 

Nom  de  fichier 

En  LOGO  un  nom  de  ficnier  peJit  "cdrtteHlr  fltilt  daraefefeSalphanumeriques.  En  CP/M 
ou  en  AMSDOS,  une  extension  de  trois  caracteres  precedee  d'un  point  est  permise  en 
plus  du  nom  proprement  dit. 
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Nom  de  fichier  ambigu  -:  : 

Nom  de  fichier  contenant  un  ou  plusieurs  jocfcers.  Cette  ambiguite  est  uttlisee  pour  tra- 
vailler  sur  plusieurs  fichiers  a  la  fois. 


Notation  polonaise  inversee  (NPI) 


m&& 


Methode  de  notation  des  operations  arithmetiques  ayant  la  faveur  de  certains  construc- 
teurs  de  calculateurs,  oil  les  operateurs  + ,  -,  x,  /  se  placent  derriere  les  valeurs  auxquelles 

ils  se  rapportent. 


Numeriseur 

Voir  Digitaliseur 

Numero  de  Iigne 

Nombres  affectes  aux  lignes  des  programmes  en  BASIC  et  dans  d'autres  langages. 

Octal 

Systeme  a  base*,  t«^iqw<Mflre([0-?)'peut  w^escrttertrofe  ttti,"  ^wt-.H 

Octet 

Groupement  de  8  bits  formant  la  plus  petite  portion  de  memoire  que  1'unite  centraie 
puisse  lire  ou  ecrire.  Le  terme  byte  (prononcer  Bait)  en  est  la  traduction  anglaise. 

Operateur  *«i;  - 

Signe  ou  symbole  (  +  ,  -,  x,  [  quHndique  la  afttwre  d'une  operation  mathematique  ou 

logique. 

Organigramme 

Representation  schematique  de  la  progression  des  etapes  d'un  programme  et  des  traite- 

ments  logiques,  retracant  la  sequence  des  evenements  d'un  programme. 
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Paddle  ultima  -  ■  ■*&. 

Voir  Joystick 


Page  Zero 

Zone  de  memoire  centra  le  qui  va  de  I'adresse  &0000  a  I'adresse  &0100.  Cette  zone  sous 

CP/M  est  utilisee  pour  stocker  Ies  tres  importants  parametres  systeme. 


Pas  de  tortue 

Distance  minimale  parcourue  par  une  tortue :  en  general  un  pixel.  W?m  ;/? 

Pascal 

Langage  de  haut-niveau,  tres  prise  par  Academe,  qui  doit  etre  compile  avant  d'etre  exe- 
cute, done  tres  rapide.  Constitue  bien  souvent  I'etape  suivante  pour  les  etudiants  du 
BASIC. 


PEEK 

Fonction  BASIC  qui  lit  le  corrisnu  d'une  celrufe de rft&noire  (octet)  designee  par  son 

adresse. 


Peripherique 

Tout  appareil  qui  peut  se  brancher  sur  un  ordinateur. 


Peripherique  logique 

Representation  d'un  peripherique  pouvant  differer  de  sa  forme  physique.  Le  peripherique 
logique  du  CP/M  peut  etre  associe  au  port  Centronics  ou  a  I'unite  d'affichage  VDU 

(Video  Display  Unit). 

'iff:  .  ■ . 

Peripherique  physique 

Peripherique  tangible  correspondant  a  des  constituants  materiels.  II  peut  etre  represente 

par  un  peripherique  logique. 
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Pile 

Memoire  dcmt  les  donnees  sont  traitees  de  telle  sorte  que  Particle  extrait  en  premier  writ 
le  dernier  article  range,  selon  le  principe  dernier  entre,  premier  sorti. 

vmh-r.. 
Pistes 

Ordonnees  de  facon  concentrique  sur  la  disquette ;  chaque  piste  contient  le  meme  nombre 
de  secteurs.  Les  pistes  et  les  secteurs  se  faconnent  a  un  endroit  specifique  au  moment  du 

formatage. 


Pistes  Systeme 

Pistes  reservees  pour  le  CP/M  sur  une  disquette. 

Pixel 

Plus  petite  partie  d'une  image  qu'un  dispositif  de  visualisation  puisse  reproduire. 

POKE  •  -'mkw&*  BftSsoim: 

Le  petit  frere  de  PEEK.  EcrivamphrtrWqtirvoyeor,  il  ecrit  wnkmr* Mia  adresse 
don  nee. 


Port 

Voie  d'acces  qui  permet  d'entrer  ou  de  recueillir  des  donnees. 

Portabilite 

Qualite  d'un  programme  qui  peut  etre  exploite  sur  pi usieurs  types  d'ordinateurs  avec  peu 
(ou  pas)  de  modifications. 


Porte 

Circuit  electronique  qui  emploie  des  composanls  realises  selon  une  technologie  particu- 
Iiereet  assembles  selon  une  technique  particuliere.  11  existe  plusieurs  types  de  portes  (OU, 
ET,  OU  exclusif,  etc.). 


Petit  dictionnaire  Annexe  2    Page  23 


Primitive  sfi*! 

Procedure,  operation,  commande  residente  du  Dr.  LOGO. 


Procedure 

Ensemble  des  instructions  a  utiliser  pour  resoudre  une  tache  particuliere. 


Progiciel  pret  a  i'emploi 

Expression  designant  un  programme  s'executant  automatiquement  des  l'amorce  du  sys- 
teme.  La  disquette  du  Dr.  LOGO  en  est  un  cxcmple. 

.     .■!.'<•  M\S J *(  llNKf-MD*'' ■>■'■■■      --"f'i 

Progiciels 

Programmes  d'applications  specialement  developpes  pour  une  tache  particuliere,  prets  a 
I'emploi.  II  en  existe  pour  gerer  l'alimentation  equilibree  des  animaux  ou,  un  peu  plus 
cher,  une  centrale  atomique. 


Pro  gram  mation  structured  JiiOS 

Technique  de  programmation  logiqueet  pre&abtieqoiffcfmefd'obtenirdes  programmes 
suivant  une  hierarchic  descendante  (du  general  au  particulier),  selon  des  etapes  clairement 

definies. 

ivy'" 
Programme 

Ensemble  ^instructions  redigees  d'apres  un  algorithme  dans  un  langage  accepte  par  l'or- 
dinateur. 

iiiiiderioM 

Programme  d'application 

A  la  difference  d'un  logiciel  a  caractere  general,  programme  ayant  une  tache  bien  precise 
a  realiser  :  un  assembleur,  une  commande  d'imprimante,  etc. 


Programme  transitoire 

Programmes  utilitaires  du  CP/M,  tel  que  FILECOPY,  qui  sont  charges  en  memoire 
(TPA)  et  executes  en  entrant  leur  nom  au  clavier. 
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PROM  (Programmable  Read  Only  Memory) 

I!  s'agit  d'unc  ROM  programmable.  Circuit  integre  sur  lequel  on  peut  ecrire  une  seule 
fois. 


Prompt  »3': 

Message  court  indiquant  a  Poperateur  que  I'ordinateur  attend  quelque  chose  au  clavier 

(exemp)e  :  est  le  prompt  de  CPM). 

Protection  en  ecriture 

Securite  empeehant  la  destruction  des  donnees  sur  une  disquette.  Une  disquette  protegee 
en  ecriture  ne  peut  etre  que  lue. 

Puce  (Chip) 

Plaquette  dc  semiconducteur  de  tres  petite  taille,  dans  laquelle  ont  etc  graves  tescentaines 
ou  les  millicrs  de  transistors  et  dc  diodes  qui  realisent  une  fonction  particuliere. 


ni>i'.- 


Quartet  (Nibble) 

Mot  anglais  signifiant  petite  bouchee  grignotee  :  il  represente  quatre  bits  d'un  octet,  done 
un  demi-octet  ("byte'  signifie  'octet',  mais  egalement  'bouchee). 


Rafralchissement 

"  -  ''I    >■■■  f ■  ... 

Operation  qui  consiste  a  regenerer  periodiquement  les  informations  contenues  dans  une 
memoirc  dynamique  constituee  de  circuits  qui  perdent  1'information  au  bout  d'un  certain 

temps. 

RAM  (Random  Access  Memory  =  Memoire  Vive  -  MEV) 

Memoire  sur  laquelle  on  peut  ecrire  et  lire  des  donnees,  un  des  elements  principaux  de 
tout  micro. 
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RANDOM  ;S 

Mot  anglais  qui  signifie  aleatoire.  II  est  souvent  utile  de  pouvoir  produire  des  nombres 
aleatoires.  Avec  le  6128  on  utilise  les  fonctions  RND  et  RANDOMISE.  Lc  6128 

peut  generer  une  sequence  pseudo-aleatoire. 

RASTER  "^ 

Technique  de  balayage  utilisee  pour  obtenir  une  image  teievisee. 

Reconnaissance  de  la  parole 

Conversion  de  la  parole  en  instructions  reconnaissables  par  l'ordinateur. 

Reconnaissance  optique  des  caracteres 

Action  de  reconnaitre  un  caractere  d'apres  sa  forme  ecrite  ou  imprimee  et  de  le  coder  par 

representation  binaire. 

Recouvrir 

Ecraser  une  zone  de  memoire  en  remplacant  son  contenu  avec  de  nouvelles  donnees. 

Recursion 


,.  -    s~  ,'■■ 


Fonction  qui  s'appelle  ou  se  met  en  jcu  d'elle-meme. 

Registre 

Endroit  de  la  memoire  du  microprocesseur  (CPU)  qui  est  utilise  pour  stocker  temporaire- 
ment  des  donnees. 


REMarque 

Commentaire  qui  ne  modife  en  rien  Pexecution  du  programme,  bien  utile  pour  compren- 
dre  un  programme  quand  on  ne  l'a  pas  ecrit,  ou  quand  on  l'a  ecrit  et  oublie. 

Reseau 

Configuration  de  deux  ou  plusieurs  ordinateurs  relies  pour  echanger  des  donnees  ou  des 

informations  par  cables  ou  modems. 
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Reserve  (mot)  ■.««:*'■■ 

Mot  cle  qui  doit  etre  ecrit  sans  faute  et  suivi  d'un  espace.  Par  exemple  BASIC  n'accepte 

pas  le  mot  NEW  en  tant  que  variable  -  c'est  deja  reserve. 


Resolution  <    ; 

Capacite  a  distinguer  des  elements  d'affichage  proches  les  uns  des  autres. 

ROM  (Read  Only  Memory  =  Memoire  Morte  -  MEM)  non;  ■ 

Memoire  figee  ne  pouvant  qu'etre  iue,  ou  se  trouvent  generalement  des  langages,  des  sys- 
temes  d'exploitation  ou  des  programmes  dont  on  a  frequemment  besoin  (cartouches 
ROM). 

Routine  (mot  anglais) 

Programme  ou  sous-programme  auquel  on  fait  souvent  appel. 

RS232C 

Interface  serie  la  plus  rcpandue,  utilisee  surtout  pour  les  communications.  Les  appareils 
aux  deux  extremites  de  cette  interface  doivent  etre  configures  (determines  dans  leurs 

echanges)  afin  de  se  comprendre.  * 

Saisie  des  donnees 

Rassemblement  et  entree  des  donnees  sur  un  ordinateur. 

■:  ■■•*  sbto;:-  ■ 
Sauvegarde 

Action  de  recopier  en  memoire  tout  ou  partie  d'un  programme,  d'un  texte,  etc.,  en  cours 

d'elaboration. 


Secteur 

Bloc  de  donnees.  Le  systeme  d'exploitation  de  1'AMSTRAD  gere  des  secteurs  de  512 

octets. 
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Separateur  ■■>?* 

Le  plus  souvent,  un  simple  espace,  mais  un  signe  d'operation  peut  egalement  servir  de 
separateur. 


Simple  face  -■■  <■ 

Disquette  dont  une  seuie  face  est  disponible  pour  ie  stockage  des  donnees.  ■  '.■  > 

Simulation  oM  aniomaM  =  yiorrwM  ytaObsafl)  MOM 

Operation  qui  cOnsiste  a  representer  le  comportement  d'un  phenomene  physique  a  I'aide 
de  1'ordinateur. 


Software 

;■  i&ittt&H 

Voir  Logiciel. 


Sortie 

Toute  donnee  qui  provient  de  1'ordinateur  apres  avoir  ete  manipulee.  Designe  aussi  les 
interfaces  qui  permettent  de  «  sortir  »  les  donnees  de  1'ordinateur. 


Sortie  imprimee 

Impression  sur  papier  d'un  programme,  d'un  texte  ou  d'un  affichafl^Ikphique.  L'equi- 

valent  sur  i'ecran  s'appelle  une  visualisation. 


Sous-programme 
Voir  Routine 


Synthese  de  la  parole 

Ensemble  de  techniques  materielles  et  Iogicielles  visant  a  generer  artificiellement  la 
parole. 
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Table  de  verite  tm%tihial  tmirrmT 

Tableau  qui  indique  1'etat  des  sorties  d'un  circuit  de  logique  binaire,  en  fonction  de  1'etat 

de  ses  entrees. 


Table  graphiqae 

Appareil  qui  numerise  les  coordonnees  des  points  d'un  dessin  afin  que  l'ordinateur  puisse 

les  manipuler. 


Tableau  (Array) 

Aussi  appele  table,  matrice ougrirte; Note : il  s'agit d'une organisation  a  une  ou plusieurs 

dimensions.  Les  donnees  sont  referencees  par  leurs  indices  dans  chaque  dimension. 


Tableur 

Logiciel  tres  prise  par  les  gestionnaires,  appele  «  spreadsheet »  par  les  anglo-saxons,  qui 
permet  de  creer  des  tableaux  de  valeurs,  d*effectuer  des  calculs  entre  colonnes.  de  sauve- 
garder  les  resultats,  etc. 


Technologie  de  1'informatioii 

Toute  technique  se  rapportant  a  1'emploi  de  Pelectronique  pour  le  traitement  des  infor- 
mations et  des  communications :  traitement  de  textes,  communications  des  donnees, 
TELETEL,  etc... 

Temps  reel 

Mode  de  traitement  qui  permet  Tadmission  des  donnees  a  un  instant  quelconque  et  1'ob- 
tention  immediate  des  resultats. 


Terminal 

Autre  nom  d'un  clavier  avec  ou  sans  moniteur  qui  permet  d'«  entrer  »  des  donnees  dans 
l'ordinateur  principal. 
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Terminal  intelligent  iMh&r  Jfc#llrT 

Terminal  generalement  de  type  conversational,  dote  de  moyens  informatiques  propres 

qui  le  rend  apte  au  pre-  ou  au  post-traitement. 


Terminal  non-intelligent 

Terminal  d'ordinateur  concu  pour  emettre  ou  recevoir  des  donnees  sans  traitement.  Un 
terminal  «  idiot »  ne  possede  pas  de  dispositifs  electroniques  de  commande  d'aflichage. 


TPA  {Transient  Program  Area) 

Zone  des  programmes  transitoires.  Une  zone  memoire  qui  commence  a  l'adresse  &0100 

et  qui  est  utilisee  par  les  programmes  transitoires  du  CP/M. 


Touche  de  fonction  wa&imf 

Touche  du  clavier  affectee  a  une  tache  specifique  qui  vient  s'ajouter  ou  remplacer  la  fonc- 
tion principale  indiquee  sur  la  touche. 


Touche  programmable 

Voir  touches  programmables  par  1'utilisateur 

Touches  de  controle  du  curseur 

Touches  (munies  de  petites  fleches)  qui  permettent  de  deplacer  le  curseur  sur  I'ecran,  dans 

un  sens  ou  dans  un  autre. 

Touches  programmables  par  Putilisateur 

Le  6128  en  comporte  32,  redefinissables  pour  ('execution  de  taches  multiples. 
Traceur  "iminei-       ..'■/liiwvsbair 

'■■(■■ly'iV'.  ■■■ 

Appareil  servant  a  tracer  automatiquement  des  courbes  planes  par  mouvement  d'un  sty- 
let encreur. 
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Traitement  de  texte  JwnHfe  tm  nnta'7 

Type  de  programme  ou  logiciel.  Indispensable  des  qu'on  veut  ecrire  une  lettre  ou  rediger 
urt  document.  Sa  complexite  et  ses  capacites  varient  en  fonction  du  prix  et  de  I'ordinateur 

auxquels  ils  sont  destines. 


Transfert  en  aval  (download) 

Transfert  d'information  d'un  ordinateur  a  l'autre.  L'ordinateur  qui  report  les  donnees 
etant  celui  en  aval  et  l'ordinateur  emetteur  etant  en  amont. 

Tronque 

Nombre  ou  chaine  reduits  par  suppression  des  caracteres  de  debut  ou  de  fin.  Lorsque  la 
troncature  est  intentionnelle,  la  valeur  peut  etre  arrondie.  Dans  le  cas  contraire,  les  carac- 
teres en  surplus  sont  tout  simplement  ignores  pour  permettre  au  nombre  ou  a  la  chaine 
de  correspondre  a  1'espace  disponible. 


UAL  (Unite  Arithmetique  Logique  =  Arithmetic  Logical  Unit  -  ALU) 

Partie  du  microprocesseur  qui  effect ue  des  operations  logiques  et  arithmetiques.  Ceux  qui 
programment  en  assembleur  ou  en  langage  machine  sont  directement  concernees  par 
cette  notion. 


UCT 

Voir  CPU 

Unite  de  disquette 

Dispositif  qui  permet  d'ecrire  et  de  retrouver  les  donnees  sur  une  disquette. 

Utilitaire 

Programme  sur  disquette  qui  permet  a  I'utilisateur  d'accomplir  certaines  taches  (voir  Pro- 
gramme transitoire). 
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Valeur  par  defaut  aJxsi  »fr  jasmstfNreT 

Valeur  adoptee  en  1'absence  de  specification  par  I'utilisateur.  Sous  CP/M  l'unite  A  est 
l'unite  par  defaut. 


Variable 

Caractere  ou  groupe  de  caracteres  qui  represente  une  valeur. 

Virgule  flottante 

Concept  informatique  utilise  pour  representer  lea i  hdaiBris  de"  gttBflfcrfaflfe. 

XYZY 

Mot  magique  permettant  de  sortir  des  situations  delicates  surgissant  dans  les  jeux  d'aven- 
ture. 


i  ..-■ 


■„*»- 
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Annexe  3 

Et  pour  quelques  programmes  de  plus... 


Bustout 

Simple  mais  passionnant  !  Sc  joue  seul  contnc  j'ordinateur.  a  pa rt ir  du  clavier  ou  avec  les 

mancues. 


10  'BUSTOUT  by  ALEXANDER  MARTIN 
20  'copyright  (c)  AMSOFT  1984 
38  ' 

40  MODE  1:BQRDER  Js INK  0,1:1NK  1,26: INK  2,24; INK  3,6 
58  SPEED  KEY  15,2 
60  ENV  1,1,18,0,  11,0,10  . 
70  ENT  1,10,2,2 
80  ENV  3,1,0,16,5,-3,2 
90  ENV  2,5,3,3,1,-21,22,9,-3,2 
100  ENT  -2, 10,2,2,5,-7, 1,2, 11,3, 2,.-4,B 
110  ' 
120  ' 

130  MOVE  30,32:DRAWR  0,400, 1 s MOVE  610,32:DRAWR  0,400,1 
140  PEN  38LOCATE  3,  UPRINT  STR ING*<36, 143! 
150  PEN  2:L0CATE  3, 2: PRINT  STRING* (36, 1 43) 

160  PEN  isFQR  r=5  TO  6;L0CATE  3,r:PRINT  STRING*(36, 1431 :NEXT 
r 

170  bx=9 

180  bals=5;scare=0 
198  PEN  IsGQSUB  680:CLEAR  INPUT 
200  IF  1NKEY*<>CHR*<32)  AND  JOY(0)<16  THEN  208 
210  LOCATE  4,23:PR1NT  SPACE* (35) : LOCATE  1,24:PRINT  SPACE»(48 

>i 

220  GOSUB  690SGOSUB  660:GDTO  280 

230  ' 

240  ' 

250  LOCATE  bx,24sPR!NT   "   " ; STRING* (4, 1 31 ) j "   "iRETURN 

260  ' 

270  ' 

260  xa=l : ya-1 : IF  INT(RND*2)=1  THEN  xa=-xa 

290  PEN  IsGQSUB  250 

300  ORIGIN  0,400  •>««  ■'-' 

310  x=bx+4:y=il:xt=x:yl=y 

320  '  ''''•■    - 

330  ' 

340  xl=x+xaiy l=y+ya 
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35B  IF  xl=3  OR  xl»38  THEN  xa=-xa 
36(8  G0SU6  540 

370  IF  yl=24  AND  xl>bx+l  AND  xl<bx+6  THEN  ya*-yat y l=y 1-2: SOU 

ND  130,44,8,7,l,l:a=<(x>bx<-5>OR(x<bx+2)):IF  a=-l  THEN  xa=xat 

a: x  l  =  x  l+xa:y 

1 =y 1 + 1 

380  IF  y  1  =  25  THEN  LOCATE  x,y.PRINT  "  "  I  GOTO  580 

390  GOSUB  250 

400  t  =  TESTU16*xl)~l,-<16*yl)-l) 

410  IF  t<>0  THEN  ya=-ya:xz=xl:yz=ylsyl=yl+yasGOSUB  590:  IF  t* 

2  THEN  score=score+10i6OSUB  660 

420  IF  t=3  THEN  scor e=score+20:GOSU8  660 

430  IF  t=l  THEN  5Core=score+5;GOSUB  660 

440  IF  yl=l  THEN  ya*l 

450  LOCATE  x,y:PRINT  H  "sLOCATE  xl,yl:PRINT  CHR$ (233) !X*xtiy 

=yl 

460  IF  y=l  OR  x=3  OR  x=3B  THEN  SOUND  129,78,8,7,1,1 

470  GOTO  340 

480  ' 

490  ' 

500  bals=bals-l:SOUND  132, 19,46, 12,2, 2: IF  bals=0  THEN  628 

510  GQSUB  660: GOTO  280 

520  ' 

530  ' 

540  IF  <INKEY(B)=8  OR  INKEY(74)*0)  AND  bx>2  THEN  bx=bx~2:RET 

URN 

550  IF  (INKEY(l)=a  OR  INKEY(75>=0)  AND  bx<32  THEN  bx=bx+2:RE 

TURN 

560  RETURN 

570  ' 

580  ' 

590  LOCATE  xz,yz:  PRINT  '  "-.RETURN 

600  ' 

610  * 

620  IF  score>hiscore  THEN  hi5core»score 

630  GOSUB  660:score=0:vies=5;GQTQ  130 

640  » 

650  ' 

660  SOUND  130,1,21,13,3,0,311  LOCATE  l,25i PRINT  TAB(4)"HISCO 

RE  "jhiscorej 

670  LOCATE  1B,25: PRINT  "SCORE*" ; score: LOCATE  30,25:PRINT  "BA 

LLES  ";bals;RETURN 

680  LOCATE  4,23: PRINT  "Appuyez  sur  <ESPACE>  pour  co«aencer"l 

RETURN 

690  LOCATE  i , 25: PRINT  SPACE* (40) ;: RETURN 
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Bombardier 

Une  version  du  grand  classique !  Se  joue  seul  contre  l'ordinateur.  A  partir  du  clavier 

seulement. 

10  '  BOMBARDIER 

20  '  copyright  (c)AMSOFT  19B4 

38  ' 

40  MODE  1 : CLSs INK  0,0:BORDER  0: INK  1 , 18: IKK  2,6: INK  3,4sINK 

5,!5:INK  6,2: INK  7,24: INK  8,8: INK  9,26l INK  10, 13: INK  11,28:1 

NK  12, 12: INK 
13, 16: INK  14, 14: INK  15,21 

50  SYMBOL  AFTER  240:BYMBDL  24  1 ,  J<40,  &60,  8<70,  lc7F,  J.7F  ,  &3F,  *7,*0 

:  SYMBOL  242,&0,8<32,&7A,&FE,!<FA,fcF2,S!E0,S!0 

60  score=B:hiscore=0:avion$=CHR*(241)+CHR$<242>:x=2:y=2:chut 

e=0:a=2:b=2 

70  BOSUB  480 

80  CLS 

90  PEN  2:L0CATE  1,15: INPUT  "Niveau  :  8  <as)  a  5  (debutant):" 

,ni  v 

100  IF  niv<8  OR  niv>5  THEN  60T0  90 

110  niv=niv+10 

120  LOCATE  1 , 15: PRINT  CHRt tl8! ; :L0CATE  1,  IS: INPUT  "Vitesse  : 
8  (rapide)  a  180  (lent)  :",vit 

130  IF  vit>108  OR  vit<0  GOTO  120 

140  ' 

150   '    Intseubles 

160    ' 

170  MODE  0:FOR  base=5  TO  15:F0R  haut=21  TO  INT  (RNDU  >  18+niv) 
STEP  -ULOCATE  base,haut :  PEN  base~2iPRINT  CHR*  ( 143) +CHR*(8) 
+CHR*(11)+CH 
R*(244)fiNEXT:NEXT 
188  PLOT  0,20,4:DRAW  640,28,4 

190  LOCATE  1,25:PEN  2:  PRINTHcore" ;  score:  :LQCATE  13,25:PRINT 
"HI";hiscore; 
200  ' 

218  '  JEU  PRINCIPAL 
220  ' 

230  LOCATE  x-1 , y: PRINT"   "; 
240  PEN  1  i  LOCATE  x,y:PRINT  avionl;:PEN  2 
250  IF  y=21  AND  x=15  THEN  GOTO  298  ELSE  GOTO  340 
260  ' 

270  '  atterissage  reussi 
288  ' 

290  FOR  c=0  TO  1088:NEXT 
300  score=score  +  100-(niv$2):niv=niv-l:x=t2!  y*2:  a*2:br2:chutee 

0 
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310  IF  niv<10  THEN  ni v=10: vi t=vi t-20 

320  IF  vit<0  THEN  vit  =  0 

338  SOTO  150 

340  FOR  c=0  TO  vit:NEXT 

350  x  =  x  +  l 

360  IF  x=18  THEN  LOCATE  x-l,ysPRINT 

TE  x,y:PEN  I : PRINT  avion*;:PEN  2 


CHR*  < 18) ; : x=2: y=y+l : LOCft 
chute=0  THEN  chute»l:b"y*2:«"K 


CHR*(252);: 
a,b:PRINT" 


370  a*=INKEY$: IF  a*="  "  AND 

380  IF  y=21  THEN  chute=0 

390  IF  chute=l  THEN  LOCATE  a,b:PRINT 

: PRINT"  ";:b=b+l:IF  b>21  THEN  LOCATE 

5-1 :  PRINT"  " 

;:a=0:b*0:chute=0: SOUND  3,4000,10,12,0,0,10 

ga=U~0.5M32:gb-400~(bm):bomb  =  TEST(ga,<}b) 

IF  bamb>0  THEN  GOTO  670 

gx=((x+1.5)*32):gy=408-(y*16)  icrash=TEST  <gx ,  gy) 

IF  crash>0  THEN  GOTO  570 

GOTO  230 


LOCATE  a,b-l 
"j {LOCATE  a, 


410 

420 
430 
440 
450 
460 
470 
480 


mode  d'emploi 


Vous 
vous 


pilotez  un  avion  au-dessus 
devez  'raser'  pour  atterrir 


Une  fois  le  bord  droit  atteint-,1 'avion 
LIGNE  PLUS  BAS.  Vous  disposez  d'une 


LOCATE  1,2;PEN  IsPRINT" 
d'une   vills  abandonnee  que 

et  faire  le 

plein  de  -fuel.Votre  avion  se  deplace  de  gauche 
e.  ":PRINT 
490  PRINTsPRINT" 
ent  a  gauche  UNE 
tite  il  1  iini t 
ee  de  bombes  et 

appuyant  sur  la 
500  PRINTsPRINT" 
itesse  de  votre 
gmente. "; ;PR 

INT: PRINT; PRINT"  VOUS  NE  POUVEZ 
LA  PRECEDANTE  N'A  PAS  EXPLOSEE  ...  , 
510  PEN  2:L0CATE  1 , 24; PR  INTi PRINT"APPUYEZ 


a 


droit 

revi 

quan 


vous  pouvez  les  larguer  surles  immeubles  en 
BARRE   ESPACE.";:PRINT 

A  chaque  fois  que  vous  atterrissez,soi tla  v 
avion   ,  soit   la  hauteur  des  immeubles  au 


LARGUER 

Ml" 


DE   BOMBE  TANT   QUE 
SUR  UNE  TOUCHE  PDU 


JOUER. "5 

a$=INK£Y$: IF 

RETURN 


a*=""  THEN  GOTO  520 


520 

530 

540  ' 

550  '  collision 

560  ' 

570  LOCATE  x-1 , ys  PRINT  CHR* (32) +CHR* (32>  +  CHR» (32! +CHR* (253)  + 

CHR$(8)+CHR*(238)+CHR*(8); 

580  FOR  t=l  TO  10  ;S0UND  7, 4000, 5, 15, 0,0, 5: PEN  tsPRINT  CHR*( 

243)+CHR$(8)+CHR*(238)+CHR$(8)+CHR$(32)+CHR*(8!  ;: NEXT i PEN  2 

590  CLS:LOCATE  1 , 5: PRINT  "SCORE: "score: 
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Et  pour  quelques  programmes  de  plus. 


600  IF  score>hi5core  THEN  hiscore=scoresLOCATE  i,8:PRINT"NEI 

LLEUR  SCORE  ! !"j 

610  score=0:LQCATE  1 ,  12: PRINT"Tapez 'R' pour  rejouer" 

620  a»=-INKEY*:IF  a$="r"  OR  a$="R"  THEN  60TO  630  ELSE  GOTO  62 

0 

630  PEN  lsMQDE  1 i x=2: y=2: a=2: b=2: 6DT0  90 

640  ' 

650  '  Immeubles  Detruits 

660    ' 

670   LOCATE   a,h-l:PRINT"    "+CHR*(BI ; ; PEN  4:F0R  tr«l   TO   INTCRND 

<Ut3>+l:score=score+5:S0UND   3,4000, 10,  12,0,0,  IBsLOCATE  a,b! 

FOR  t*0  TO  4 

i PRINT  CHR*(253S+CHR*(B)+CHR*(32)+CHR*(8>$iNEXT:b=b+l 

6S0  IF  b=24  THEN  b*b-l 

690  NEXT 

700  LOCATE  6,25:PRINT  score; :chute=0:a=x :b=y:60T0  230 


Et  pour  quelques  programmes  de  plus... 
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I 


Ping-pong 


i*  Mr 


u 


C'est  le  plus  vieux  de  tous  les  jeux,  mais  il  fait  toujours  recette !  Vous  pouvez  jouer  a  deux 
ou  seul  contre  1'ordinateur,  a  partir  du  clavier  ou  avec  les  manettes  de  jeu. 


10 
20 
30 
40 
50 
60 

7a 

80 
90 
100 
110 

120 
130 
140 
150 
160 
170 
180 
190 
e$) 
200 
210 
220 
230 
240 
250 
260 
270 
2813 
290 


'PING  PONG 
'  copyright 


by  DAVID  RADISIC 
(c>  AMSQFT  1985 


"###*  "jscorelj 
####  ";score2j 


DEFINT  a-z 

comp=l 

ENV  1, =11, 20, =9,5000 

MODE  IjINK  0,10:BORDER  1 0  s 1 NK  1 , 26 : INK  2, 18s  INK  3,0 

GOSUB  710 

GOSUB  150 

GOSUB  330 

GOSUB  420 

LOCATE  13,1: PRINT  USING 

LOCATE  35,  1  SPRINT  USING' 

GOTO  100 

PEN  2 

x(l)«3:y(l)»S  - 

x<2)=37:y(2)=22 

cote*=CHR*(233!:cote2*=STRING*(2,207) 

LOCATE  1,3:PRINT  STRINGS  (39, cote*) : PRINT  STR  INGI (39, cot 

FOR  i=l  TO  19 

PRINT  cate2*;TAB(38>;cote2» 

NEXT 

PRINT  STRING*  (39, cote*) sPR INT  STRING* (39, cote*) J 

WINDOW  #1,3,37,5,23 

CLS  #1 

SYMBOL  240,0,60,126,126,126,126,60,0 

raquette**" ! "+CHR$(8I +CHR*(10)+"  ! " 

eff*="  "+CHR*(B)+CHR*!10)+"  " 

balle*=CHR*(24B) 

PEN  3 

2,l!PRINT"jaueur  1 


k 


300 

310  LOCATE 
ur  2  :  0 
320  RETURN 

n  =  IH'." 

PEN  3 

FOR  i=l  TO  2:L0CATE 

ON  n  GOTO  390 


0";:LOCATE  24, 1 : PRINT"j oue 


330 
340 
350 
360 
370 
380 
390 
400 


[RND*2)!CLS  #l:scored=0 


x(i),y(i):PRINT  raquette*; ;NEXT 


xb«21idK»l 

GOTO    400 
xb=19:dx=l 

yb=12:dy=INT 


(RND»3)-1 


9+ 
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Bt  pour  quelque*  programmes  de  plus. . . 


410  RETURN 

420  BOSUB  680 

430  oxb=xb;oyb=yb 

440  SOSUB  500 

453  IF  note>0  THEN  BOUND  129, note, 50, 15, 1 

460  LOCATE  axb,oyb: PRINT"  "; 

470  LOCATE  xb,yb:PRINT  balle* 

480  IF  scored=0  THEN  420 

490  RETURN 

500  LOCATE  xb+dx,yb+dyiCh*=COPYCHR*(*0) 

510  note=0 

520  IF  ch$="  "  THEN  xb=xb+dx : yb=yb+dy: RETURN 

530  IF  ch$="i"  THEN  dx=2-dx-2: dy=INT <RND*3> -1 ; note=200:RETUR 

N 

540  IF  ch*=LEFT*(cote2*,l>  THEN  570 

550  IF  ch*=cate$  THEN  dy=2-dy-2:note=250 

560  RETURN 

570  IF  dx>0  THEN  score l=score 1 +1  ELSE  scare2=scare2+l 

580  scored=i;note=2000 

590  RETURN 

600  pm  =  (INKEY(69)>=0)  +  (INKEY<72)>=0)+ABSUINKEY(71)>=0)  +  (I 

NKEY<73>>=0) )*2 

610  IF  comp=l  THEN  p (2) =ABS (y (2><yb ) *2  + <y (2) >yb ) : GOTO  630 

620  p(2)=(INKEY(4)>=0)+(INKEY(48)>=0)+ABS((lNKEY(5)>=0)+(INK 

EY(49>>=0!)*2 

630  PEN  3 

640  FOR  i=l  TO  2 

650  LOCATE  x  ( i ) ,  y  ( i )  +p  (i ) :  ch*=COPYCHR*  (#19) 

660  IF  ch*="  "  THEN  LOCATE  x (i ), y (i ): PRINT  ef f $j : y ( i ) =y  < i  >  +R 

OUND(p(i)/2) 

670  LOCATE  x  (i ), y  li ): PRINT  raquette*; 

680  NEXT 

698  PEN  1 

700  RETURN 

710  PEN  2:PRINTiPRINT  TAB  ( 15)  "Ping^-Pong" :  PRINT  TAB(15)" 

720  PEN  3i PR  INT: PRI NT  TAB(14)"Pour  utiliser  les  raquettes  :" 

730  PRINT:PRINT;PEN  1 

740  PRINT"  Joueur  1     Joueur  2       direction"!PRINT 

750  PRINT"     A  6  HAUT" 

760  PRINT"     Z  3  BAS":PRINT 

770  PEN  3: PRINTjPRINT  TAB(l3)"Ou  les  Joysticks" 

780  PRINTsPRINTjPRINTjPRINT 

790  PEN  2 

800  PRINT  TAB(6)"  Choixs  <1>  ou  <2>  Joueurs" 

810  i$=INKEY$iIF  i $<>"!"  AND  i*<>"2"  THEN  810 

820  IF  i*="t"  THEN  comp=l  ELBE  comp=0 

830  MODE  IsRETURN 
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Escrime  eleetrique 

Vous  devez  vaincre  votre  adversaire !  Ne  se  joue  qu'a  deiix,  a  partir  du  clavier  ou  avec  les 
manettes, 

10  "ESCRIME  ELECTRIBUE  par  ALEXANDER  MARTIN 

20  'copyright  <c>  AMSOFT  1985 

30  ' 

40  DEFINT  a-z 

50  MODE  0 

60  GQSUB  980 

70   BOSIJB    1370 

80  GOSUB  270 

90  GOSUB  1520 

100  GOSUB  1370 

110  GOSUB  1270 

120  '  '■ 

130  ' 

140  REM   debut 

150  IF  fini  THEN  GOTO  100 

160  GOSUB  240 

170  FRAME: IF  jldir  THEN  GOSUB  570  ELSE  FRAME:FRAME 

180  FRAME: IF  j 2d i r  THEN  GOSUB  620  ELSE  FRAME:FRAME 

190  IF  jlsa=-l  THEN  GOSUB  670 

200  IF  j2sa=-t  THEN  GOSUB  720 

210  GOTO  140 

220  ' 

230  ' 

240  IF  j  THEN  380  ELSE  480 

250  ' 

260  ' 

270  CLSiPEN  6 

280  PRINT: PRINT"  Choix  des  commandes" 

290  PRINT;PRINT;PRINT:PRINT"  <J>ou<C>  puis  ENTER" 

300  LOCATE  6, 10: PRINT" JOYSTICK" : PRINT! PRINT"   ou  CLAVIER" 

318  LOCATE  15, 10: IF  j  THEN  PRINT"*"ELSE  PRINT"  " 

320  LOCATE  15,12: IF  j  THEN  PRINT"  "ELSE  PRINT"*" 

330  IF  NOT  <INKEY<45)>  THEN  j=-l 

340  IF  NOT  (INKEY(62)(  THEN  j=0 

350  IF  NOT  (INKEYUB))  THEN  RETURN  ELSE  310 

360  ' 

370  ' 

380  jl=JOY(0) :j2=J0Y(l) 

390  jldir=(jl  AND  l)l-l+(jl  AND  2)10.5 

400  j2dir=(j2  AND  D*-l+(j2  AND  2)10.5 

410  IF  jl  AND  16  THEN  j lsa=j isa-1 : IF  jlsa*~l  THEN  AFTER  15  G 

QSUB  770 


**► 
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428  IF  j2  AND  16  THEN  j2sa=j2sa-l : IF  j2sa»-l  THEN  AFTER  15  9 

0SU8  770 

430  IF  jlsa  THEN  jldir=0 

440  IF  j2sa  THEN  j2dir=0 

458  RETURN 

460  ' 

470  ' 

480  j2dir=UINKEY(4)=0)*l)  +  ((INKEY(5)=0H-ll 

490  jldir={UNKeY(691=0m)  +  <(INKEY<7t)=0)t-l) 

500  IF  INKEY(63)=0  THEN  j  lsa=j lsa-1 i IF  jlsa=-l  THEN  AFTER  15 

GOSUB  770 
510  IF  INKEY  (10)=0  THEN  j 2sa=j2sa-l : IF  j2sa=-l  THEN  AFTER  1 
5  GOSUB  770 

520  IF  j lsa  THEN  jldir=0 
530  IF  j2sa  THEN  j2dir=0 
540  RETURN 
550  ' 
560  ' 

570  pt  =  j lwp+jldir:  IF  pt>25  OR  pt<6  THEN  RETURN  ELSE  jlwp  =  pt 
580  j tdir=0 

590  PEN  1: LOCATE  3,jlwp;CLS  #3t PRINT  CHR* (209) ;: RETURN 
600  ; 
610  ' 

620  pt  =  j2wp+j2dir:  IF  pt>25  OR  pt<6  THEN  RETURN  ELSE  j2wp  =  pt 
630  j2dir=0 

640  PEN  2:L0CATE  18,  j2wp:  CLB  #5:PRINT  CHR* (21 1 );: RETURN 
650  ' 
660  ' 

670  PAPER  #4, 4; WINDOW  #4, 4, 17, j lwp, j 1 wp: CLS  #4: FRAME: FRAME 
68-0  PAPER  #4,0:CLS  #4 
690  GOTO  570 
780  ' 
710  ' 

720  PAPER  #6, 5: W I NDDW  «6, 4, 17, j 2wp, j 2np; CLS  #6:FRAME: FRAME 
738  PAPER  #6,0:CLS  #6 
740  GOTO  620 
750  ' 
768  ' 

778  jwpe=(j lwp=j2wp) : IF  jlsa  AND  NOT  (j2sa)  AND  jwpe  THEN  jl 
sc=jlsc+USQUND  132,  120,  10,  0,  1 ,  0:  PR  INT  #  1 ,  a*  ( j  t  sc ) ; :  IF  jlsc  = 
9  THEN  860 

780  IF  j2sa  AND  NOT  (jlsa)  AND  jwpe  THEN  j2sc=j 2sc+l ; SOUND  1 
32,100,10,0,l,0:PRiNT  #2,  a*( j2sc)  ;  :  IF  j2sc=9  THEN  860 
790  IF'jlsa  THEN  SOUND  132,40,70,0,1,1 
800  I?  j2sa  THEN  SOUND  132,56,70,0,1,1 
810  jlsa=0 
820  j2sa=0 
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830  RETURN     -"  ;  ■--■":*.  V  M  -.=■:=■■;■.  ■   :<■■-<*  ■  ■  --r-'t-    -■ 

840  * 

850  ' 

860  PEN  6 

870  LOCATE  6, 10: PRINT"GAME  OVER" 

880  IF  jlsc  =  9  THEN  INK  1 , 2, 20! INK  2,0  ELSE  INK  2,6, 17s  INK  1, 

0 

890    SOUND    129,  1000,0,  12, 3:S0UND    130,900,0,12,3 

900    WHILE    INKEY*<>""iN£ND 

910   t  f=TIME: WHILE    t ! +2000>TIME: WEND 

920    WHILE    INK£Y$="":WEND 

930    CLS 

940   fini=-l 

950    RETURN 

960    ' 

970    ' 

980     a$<0>="lltl0110n01111" 

990     a$U)="00100100i001001" 

1000  a*  (2)  ="11 1081111100111"  af   '■:■'■■ 

1010   a*(3)="11100Ult0011U" 

1020   a*(4}="10010010111100l" 

1030  a$(5)  =  »nn00iii00inr 

1040  a$(6»="11110011110llll" 

1058  a*(7)="ill00100l0100i0» 

1060  a*(8)="111101111101111" 

1070  a*(9)="lill01111001001" 

1080  FDR  n=0  TO  9 

1070  taille*LEN(a$(n)) 

1108  FOR  n2=l  TO  taille 

1110  IF  MID*(a4(n))n2,l!=,llB  THEN  MID*  (a*  (n)  ,n2, 1)  *CHR*  ( 143) 

ELSE  KID$(a$(n),n2,l!*CHR*(32) 
1120  NEXT  n2,n 
1130  ' 
1140  » 

1150  b*="ESCRIHE  ELECTRIQUE" 
1160  c*=CHR*(32>+CHR*U64)+"  Alexander  Martin" 
1170  ENV  1,=9,2000:ENT  -1,6,3,1 

1180  ENV  2,127,0,0,127,0,0,127,0,0,127,0,0,127,0,0 
1190  ENV  3, =9, 9000 
1200  ' 
1210  ' 

1220  BORDER  0 

1230  INK  0,12:PEN  #4,  tsPEN  #6,2tPEN  tl,lsPEN  #2,2;PAPER  #1,3 
iPAPER  #2,3:PEN  #0,6 

1240  RETURN  'FIN  DE  DEFINITION  DES  CONSTANTES 
1250  ' 
1260  ' 
1270  INK  8,12!lNK  1,2: INK  2,6:INK  3,13:INK  4,20sINK  5,1:  INK 
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1288  WINDOW  #3,3,3,6,25: WINDOW  15,18,18,6,25 

1290  WINDOW  #1,3,5, l,5iWINDQW  #2, 16, 18, 1 , 5: WINDOW  #7,1,28,1, 

5:PAPER  #7,3 

1380  CLS:CLS  #7: PRINT  #1 , a* (0) ; ; PRINT  #2,a!(B> j : j lsc=fl: j2sc= 

0: j lwp=Ss j2wp=24s jldir=t: j2dir=l 

1310  GOSUB  570;GOSUB  620 

1320  SOUND  1,1000,0, 12, 2:S0UND  2,900,8,12,2 

1330  jlsa=0:j2sa=0:Uni=8 

1348  RETURN  'FIN  DU  RENOUVELEMENT  DE  L'AFFICHAGE  DU  SCORE 

1350  * 

1360  ' 

1378  CIS 

1380  PEN  7 

1390  FOR  n=l  TO  LEN<b$) 

1400  LOCATE  Itn.lB 

1410  FOR  n2=LEN(b*>  TO  n  STEP  -1 

1420  PRINT  MlD*(b$,n2,U 

1430  LOCATE  l+n,10 

1440  SOUND  135, 20»n2, 5, 12,2,1 

1450  NEXT  n2.n 

1460  SOUND  135,108,0,  13,3,1,20 

1470  PEN  6:PRINT:PRINT:PRINTsPRINT  c* 

1480  FOR  n=t  TO  5000:N£XT 

1490  RETURN 

1500  ' 

1510  ' 

1520  IF  j  THEN  RETURN 

1530  CLS 

1540  LOCATE  1,5 

1550  PRINT"  controle  du  jeu" 

1560  PRINT 

1570  PRINT "Joueur  1    Joueur  2" 

1580  PRINT 

1590  PRINT"    A    HAUT    6" 

1600  PRINT"    Z     BAS    3" 

1610  PRINT"    X     TIR    7" 

1620  t'=TIME:WHILE  t ! +1000>TIME: WEND 

1630  RETURN 
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DATABASE 

Ce  programme  bien  utile  vous  permettra  de  creer  des  petits  fichiers.  Vous  serez  de  cette 
maniere  en  mesure  de  comprendre  les  mecanismes  utilises  pour  Pouverture  et  la  fermeture 
des  fichiers  sur  la  disquette  ainsi  que  plusieurs  autres  routines  interessantes  (caracteres 
double  hauteur,  boucles  while.. .wend). 


10 

20 

30 

40 

50 

60 

70 

80 

90 

100 

110 

120 

130 

140 

158 

160 

170 

IB0 

190 

200 

210 

220 

230 

240 

250 

260 

270 

260 

290 

300 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 

410 


'   ttttmm  database  mttttmt 

'    Dfl  12/12/B4 

'  Initialisation 

CLEAR 

SYMBOL  AFTER  0 

DEF  FNdeek  (x)=PEEK(x)+256*PEEK<!<  +  l>  '  Deek 
SPEED  WRITE  1 

recnum  =  50    '  Nombre  d' enregistremertts 
ht     =12    '  Nombre  d'en-tetes 
beep*   =  CHR*<7) 

'  Definition  du  cods  double  hauteur 
RESTORE  3520 

double*=STRING*<81,32)  :  double*="" 
FOR  j=0  TO  80 

READ  j  :  double*=double*+CHR*(j) 
NEXT 
double  =  FNdeek(3double*+l) 

definition  de  6  champs/enreg. 
DIM  * iel dl* (recnum+l ) , f iel d2* (recnum+1) 
DIM  Held'* (recnum+1) ,  Held4*  (recnum+1 ) 
DIM  f  i el d5* (recnum+1 J ,  Heidi*  'recnum+1 ) 
nextblank=  1  '  pointeur  sur  esoace  pour  le  suivant 
'Le  libelle  des  champs  est  ds  le  ler  enreg. 
lit  les  en-tetes  des  champs 

Held3$(0! 

f  i  el d6S (0) 


RESTORE  3620 

READ  Heldlt(B) 

READ  Held4*(0l 

'  Ecran 

MODE  liBOROER  13 

INK  fl, 13: INK  1,0s  INK  2, 3r INK 


,Held2*(0; 
,  Held5*(0; 


0:PEN 

2990 
370  ' 
560  ' 


1 


PAPER 

SOSUB 

GOSUB 

GOSUB 

END 

'  SOUS-PROGRAMME: 

title*="Database 

GOSUB  2820 

sp*=STRING$(40,32) 

LOCATE  1,6 

PRINT  CHR$!24);sp«; 


3,26 


11  lustration 
Ecran  d' introduction 

Menu 


Ecran  d'intro 
Amstrad" 
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El  pour  quelques  programmes  de  p!i 


420  PRINT  "  Ce  programme  vans  permet  cP  enre-gistrer  " ;  5 p * ; 

430  PRINT  "  jusqu'a  50  noms,  avec  au  plus  6  champs  ";sp$j 

440  PRINT  "  par  enregi strement . Le  programme  a  ete  ":sp*; 

450  PRINT  "  fait  pour  etre  utilise  comme  un   ";sp$; 

460  PRINT  "  repertoire,  mais  il   peut  etre  modifie  ";sp»; 

470  PRINT  "  pour  servir   de  liste   de   disques,     "isp«; 

480  PRINT  "  de  lisle  de  programmes  ou  de       '  5  s  P  *  5 

490  PRINT  "  dictionnaire  geoqraphique  par  example.  ";sp«; 

500  PRINT  CHR*(24) j 

510  MQVE  4,316  :  DRAW  634,314,0 

520  DRAW  634,50  :  DRAW  4,50  :DRAW  4,316 

530  6DSUB  2750  '  Appuyez  sur  ESPACE 

540  RETURN 

550  '  SOUS-PROGRAMME:  Menu 

560  title*="Database  Amstrad":  GOSUB  2820  '  en-tete 

570  MOVE  10,38   :  DRAW  10,330,1  :  DRAW  630,330 

580  DRAW  630,38  ;  DRAW  10,38 

590  MQVE  14,42   :  DRAW  14,326,1  J  PRAW  626,326 

600  DRAW  626,42  :  DRAW  14,42 

610  WINDOW  3,39,6,25 

620  PRINT:PRINT  "Ajouter  un  enreg.  a  database ft" 

630  PRINTsPRINT  "Enlever  un  enreg.  a  database. ".E" 

640  PRINTtPRINT  "Retrouver  un  enreg.  particulier . . . .R" 

650  PRINTsPRINT  "Chancier  le  nam  des  champs C" 

660  PRINTiPRINT  "Imprimer  les  enreg.  de  database....!" 

670  PRINTsPRINT  "Charger  un  fichier L" 

680  PRINTiPRINT  "Trier  les  enreg.  par  ordre  alphab..T" 

690  PRINTsPRINT  "Sauvegarder  un  Uchier S" 

700  WINDOW  1,40,1,25 

710  WHILE  G*>""  :  G*=INK£Y*  :  WEND 

720  WHILE  G*=""  :  G*=INKEY$  s  WEND 

730  option  =  INSTR("AETCftLSr',UPPER*(G$M 

740  ON  option  GOSUB  810,970,1170,2400,1550,1850,2060,2260 

750  '   OPTIONS  :      A    E     T    C    R    L    S     I 

760  IF  option  THEN  560  '  commands  a  e-f-fectuer 

770  PRINT  beep*;  :  SOTO  710 

780  ' 

790  '  SOUS-PROGRAMME:  Ajoute  un  enreg. 

800  ' 

840   title$="Ajout   d'un   enrg"    !    60SUB   2828   '    en-tete 

820    IF    nextblank    >    recnum    THEN   LOCATE    14,8    t    PRINT    "Database 

plein"    :    GOTO   2750 
830   PRINT"C'est   1 'enreg.    numero" snextblank 
840    PRINT 
850   PRINT    fieldl$(0)  ;  TAEMht) ;;  INPUT    " : " ,  f  ieldl*  (nextbl  ank) 


►► 
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860 

PRINT  field2*(0);TAB(hti;:INPUT  " : " ,  f  ield2*  (nexthl  ank) 

870 

PRINT  field3*(0))TA6(ht>; 

INPUT  " 

",field3f (nextblank) 

880 

PRINT  field4*<0>;TA8(ht) ; 

INPUT  " 

"ffield4$(nextblank) 

890 

PRINT  field5« (0) ; TAB (ht) j 

INPUT  " 

",field5*(nextblank) 

900 

PRINT  f ield6*<0) jTAB(ht) ; 

INPUT  " 

",f ield6$(nextblank! 

910 

nextblank=nextblank+l 

920 

SQSUB  2750 

930 

RETURN 

940 

' 

950 

'  SOUS-PROGRAMME:  Efface  un  enreg. 

960 

t 

970 

title*="Effacer  un  enrq."  :  GOSUB  2820  '  en-tete 

980 

INPUT  "Ef facer  quel  enrq."  ;  dl 

990 

PRINT 

1000 

IF  dl  >=  nextblank  THEN  PRINT  "Get  enreg.  n'existe  pas" 

:  GOTO  1120 

1010 

d»dl  :  st*0  ;  GOSUB  2640  '    affiche  1'enreg. 

1020 

INPUT  "0  pour  confirmer  1 ' ef f acagej " , q$ 

1030 

PRINT 

1040 

IF  UPPERS  (q$)<>"0"  THEN  PRINT  TABU2)i"Pas  d'effacaqe" 

:  GOTO  1120 

1050 

FOR  i*d  +  l  TO  nextblank 

1060 

fieldl*(i-l)=fieldl*U):field2*U-l)  afield  2$  (t) 

1070 

field3*(i-i)=field3*(i)!f ield4*(i-l ! =f ield4$ (i) 

1060 

field5*<i-l>=fieid5$U>ifield6$(i-l)=field6*(i) 

1090 

NEXT 

1100 

nextbl ank-nextbl ank-1 

1110 

PRINT  TAB ( 18) i "Ef facage" 

1120 

GOSUB  2750  '  espace 

1130 

RETURN 

1140 

t 

1150 

'    S0US-PR06RAME:  tri 

1  160 

* 

1170 

title*="Tri   enreg."  ;  SOSUB  2820  '    en-tete 

1180 

PRINT  s  PRINT  TAB(81;"Tri  des  enrq.  par  ";fieldl$<Bt 

1190 

'  Shell/Metzner  No.  1  Classement  des  fieldl*  (1  a  numXl 

1200 

'  debute  avec  nuffl"/.  =  na(ribre  d'enreg.  !  utilise  1'integral 

1210 

timethen  =  TIME  '  chronometre  le  classement 

1220 

numX=nextblank-l 

1230 

slX=nuiftX 

1240 

WHILE  si 7.  H 

1250 

six=sr/.  /  2 

1260 

■2X>nuaX-fll 

1270 

f  1  a  g '/.  =  1 

1280 

WHILE  HagX=l 

1290 

flag7.  =  0 

1300 

FOR  s37.=  l  TO  s2X 
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1310  s4X*SlX+s3X  ■   '^.f£\l..m 

1320  IF  fieldl*(s3X)    >   f  ieldl*  (s4X>    THEN   B0'SU»rM41 

1338         NEXT  s37. 

1340       WEND 

1350    WEND 

1360  tiroenow  =  TIME  -  timethen 

1370  timenow  =   INT (tiflienow/30)  /  10  '  en  seconde  a  la  dizai 

ne  pres. 

1380  LOCATE  6,12  :  PRINT  "Classement  en" ;  timenow;  "secondes 

1390  60SU8  2750  '  espace 

1400  RETURN  '  au  menu  principal 

1410  ' 

1420  '  SOUS-PROGRAMME:  Permutation 

1430  ' 

144  0  sl*=-fieldl*(53X):  +  ieldl*<s3X>=-f  ieldl*  (s4X) :f ieldl*(s4X) 

145B  sl*=Held2*(s3X):field2*<s3X)=field2*(s4X)!Held2*(s4X) 

=  si* 
1460  5l*»=field3*(s3X):field3*(s3X)=Ueld3*(s4X):Held3*(54XJ 

-  si* 

1470  sl$  =  field4*(s3X):Held4*(s3X)=field4*(s4X)!*ield4*(s4X> 

-  si* 

1450  sl4  =  Held5*(537,):Held5*(s3X)=Held5*(s4X):field5*(s47.) 

=  si* 
1490  sl*=-field6*(s37.)  :*ield6*  (s3X)=f  ield6*(s4X)  :f  ield6*(s4/.J 

=  si* 

1500  *laqX=l 

1510  RETURN  '    au  sous-prg  de  Classement 
1520  ' 

1530  '  SGUS-PROSRAMME:  Recherche 
1540  ' 

1550  title*="Trouver  un  enrg."  s  SOSUB  2820  '  en-tete 
1560  LOCATE  3,6 

1578  PRINT"pour  taut  lire  appuyez  sur  ENTER" 
1580  LOCATE  1,8 

1590  INPUT  "Lettres  a  rechercher  :",qu* 
1600  qu*=UPFER*<qu*l 
1610  FOR  se=l  TO  nextblank-1 
1620  q*  =  qu* 

1630  IF  INSTR(  UPPER*(f ieldl* (se) ) 
1640  IF  INSTR(  UPPER*(F  ield2*<se>  ) 
1650  IF  INSTRt  UPPER*(*ield3S(se) > 
1660  IF  INSTR(  UPPER* (f t eld4* (set ) 
1670  IF  I.NSTR(  UPPERStf  ield5*(se>  > 
1680  IF  INSTRi  UPPER* <* ield6* !se> ) 
1690  NEXT 


q*  )  THEN  GOSUB  1750 

q$  )  THEN  GOSUB  1750 

q*  )  THEN  GOSUB  1750 

q*  )  THEN  G0SU8  1750 

q*  )  THEN  80SUB  1750 

q$  )  THEN  GOSUB  1750 
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1700 

CLS  : 

GOSUB  2750  »  espacE 

1710 

RETURN  '  au  menu  principal 

1720 

r 

1730 

'    SOUS-PROGRAMME:  Affiche  l'enreg.  trouve 

1740 

9 

1750 

CLS 

1760 

PRINT 

:  PRINT 

1770 

d  =  se 

:  st=0 

1780 

GOSUB 

2640  '  Affiche  l'enreg. 

1790 

GQSUB 

2750  *  espace 

1800 

q$=CHR${0!  '  pour  eviter  flTecrire  plusieurs  fois  le  mem 

e  i t< 

?m 

1810 

RETURN 

1820 

I 

1830 

'  SOUS-PROGRAMME  :  Chargement  fichier 

1840 

I 

1850 

title$="Charger  un  fichier":  GOSUB  2820  '  en-tete 

I860 

PRINT1 

'Mettez  la  disquette  contenant  le  " 

1870 

PRINT1 

'■fichier  dans  le  lecteur  puis" 

1880 

PRINT' 

'entrez  le  nodi  du  fichier" 

1.890 

PRINT; 

iINPUT  "Nom:  ",fS 

1900 

PRINT; 

iOPENIN  f* 

1910 

INPUT 

#9,nextblank                    ■   ■ 

1920 

FOR  i  = 

=0  TO  nexttslank-1 

1930 

INPUT 

#9,fieldl$<i) 

1940 

INPUT 

#9,fieid2*U) 

1950 

INPUT 

«9,fiflld3*(i) 

1960 

INPUT 

#9,field4*(i) 

1970 

INPUT 

#9,+ield5*(i> 

1980 

INPUT 

#9,f ie!d6*(i ) 

1990 

NEXT  i 

2000 

CLOSEIN                                    ■ '    ■ 

2010 

GOSUB 

2750  '  espace 

2020 

RETURN 

1 

2030 

J 

2040 

'  SOUS 

i-PRQGRAMME:  Sauvegarder  1  fichier 

2050 

J 

2060 

title* 

i="Sauvegarde  des  enreq.":  GOSUB  2820  '  en-tete 

2070 

PRINT" 

Placez  une  disquette  dans  le  lecteur" 

2080 

PRINT" 

Entrez  le  now  du  fichier  :" 

2090 

PRINT! 

INPUT  "NoitiJ  ",f$ 

2100 

PRINT: 

OPENOUT  f$ 

2110 

PRINT 

#9,nextblank                            ■'■ 

2120 

FOR  i  = 

■9   TO  nextblank-i  ■■ 

2130 

PRINT 

»9,fieidU(i) 

2140 

PRINT 

#9,+ield2*(i) 
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2150  PRINT  *9tf ield3$(i) 

2160  PRINT  #9,field4*(i )  "  . 

2170  PRINT  #9,Heid5»(il 

2180  PRINT  #9,*ield6*(i> 

2190  NEXT  ■.  • 

2200  CLOSEOUl 

2210  GOSUB  2750  '  espaee 

2220  RETURN 

2238  ' 

2240  '  SOUS-PROGRAMME: Impression 

2250  ' 

2260  tjtle*="lmprimer  les  enreg."  !  GOSUB  2820  '  en-tete 

2278  INPUT  "Ave:  vous  uoe  imprimante  connectee  <0/N) ", q$ 

2280  IK  UPPERS  (qllO'O"  THEN  CIS  :  5t=0  ELSE  St=8 

2290  PRINT  #st, "DATABASE  AMSTRAD" 

2300  PRINT  #5t  ;  PRINT  #st 

2310  FOR  d=0  TO  nextblank-1 

2320  GOSUB  2640  '  aHiche  enreg. 

2330  NEXT 

2340  PRINT  #st  :  PRINT  #st 

2350  GOSUB  2750  ;  espaee 

2360  RETURN 

2370  ' 

2380  '  SOUS-PROGRAMME:  Nom  champs 

2390  ' 

2400  tiUe$  =  "Nom  des  champs"  :  8QSU6  2828  '  en-tete 

2410  PRINT  :  PR  IN  I  "en-tete  1 :  " ;  f  i  el  d  i$  (0! 

2420  INPUT  "Change  en: !'  ,iii 

2430  IF  +i  $.>"■"  THLN  f i eld  1*10) =*iS 

2440  PRINT  :  PRINT  "en-tete  2:  " ;  +  i  el  <i?t  'G  ; 

2450  INPUT  "Change  en :  " , i i * 

2460  II-  *\$> ('HEN  field2$(0)H  i* 

2470  PRINT  :  PRINT  "en-tete  3 : " i + i el dSt < 0! 

2460  INPUT  "Change  em",  (it 

2490  IF  fi*>""  THEN  ( ieid 31 (0 1 -i  1 1 

2500  PR  INI  :  PRINT  "en-let  e  4: " ; ii el d4* (01 

2510  INPUT  "Change  en:",M$ 

2520  IF  fi*>""  THEN  Hel  d4*  (0)  -U* 

2530  PRINT  :  PRINT  "en-tete  5:  "  ;  Held5$  t  0) 

.2540  INPUT  "Change  en:", fit 

2550  IF  ti$>""  THEN  H eld5* (0) =f i *  ":- 

2560  PRINT  :  PRINT  "en-tete  6: " ; t ield6* (0 ) 

2570  INPUT  "Change  en:",fi* 

2580  IF  fi*>""  THEN  H el d6* (0) =  f i $ 

2590  GOSUB  2750  '  espaee 
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2600 

2610 
2620 
2630 
2640 
2650 
2660 
2670 
2680 
2690 
2700 
2710 
2720 
2730 
2740 
2750 
2760 
2770 
2780 
2790 
2B00 
2810 
2820 
2830 
2840 
2850 
2860 
2870 
2880 
2890 
2900 
2910 
2920 
2930 
2940 
2950 
2960 
2970 
2980 
2990 
3008 
3010 
3020 
3030 
3040 


RETURN  ■    .       ■  ■    ■• 

> 

'    SOUS-PROGRAMME!    AHiche   L'enreg.    en    cours 


PRINT  •st.-L'enreg.* 

PRINT  *st,fieldl*(0i 

PRINT  *5t,<ield2*<0] 

PRINT  #st,field3$(0; 

PRINT  #st,Held4$<8! 

PRINT  #st,f ield5$(0! 

PRINT  #st,Held6«(0) 

PRINT  #st  :  RETURN 


fd! "est: 

jTAB(ht) 
jTAB(ht) 
;TA8(ht) 
;TAB(ht> 
jTAB(ht) 
:TAB<ht) 


PRINT  Kst 


field2*(d) 


eldl*(d) 


eld3$(d) 


Held4$(d) 


eld5*(dl 


field6*(d) 


SOUS-PROGRAMME:  Espace 


LOCATE  10,25 
PRINT  "ESPACE  pour 
WHILE  INKEY$<>"  "  ; 

RETURN 


cant inuer ' 
WEND 


SOUS-PROGRAMME:  AHichag*  du  titre 


tl=LEN(title*)+2 

tt=INT((40-tl)/2) 

CLS 

PAPER  1  :  PEN 

LOCATE  tt,l  : 

LOCATE  tt , 2  : 

LOCATE  tt,3  : 

PAPER  0  :  PEN 

PRINT  '  pour 

tx=tt*l6-l2  : 

MOVE 


tx,396  ! 
DRAW  txl,354 


DRAW  tx, 
RETURN 


396 


3 

PRINT  STRINBKtl, 

PRINT"  "; title* ;' 

PRINT  STRINE*(tl, 

1 

eHacer   une   ligne 
tx  t=  <  tt  +  tl ) » 16-2* 
DRAW    txl, 396,0 

:  DRAW  tx,354 


32) 

n 

32) 


a  la  -fin 


SOUS-PROGRAMME:  Image  ecran 


CLG  0:ZX=16 
RESTORE  3460 
YX=250:FOR  XX=4( 
YX=YV.~ZX 

READ  N$ 
GQSUB  3310 


TO    10    STEP    -ZX*2 
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3050  NEXT 

3060  ORIGIN  0,0,8,639,0,3?? 

3070  FOR  XX=630  TO  616  STEP  -IsMQVE  XX,33B:DRAW  XX,  XX-296, 2: 

NEXT 

3080  FOR  XX=0  TO  16  STEP  2:MQVE  XX,  1 40:  DRAW  XX, 140+XX/l, 5,2: 

NEXT 

3090  ORIGIN  0.0,0,234,30,140  !  CLG  2 

3100  ORIGIN  0,0,0,639,0,399 

3110  YX=30;FOR  X 7,  =  2 3 4  TO  630  STEP  2 

3120  MOVE  XX, YX; DRAW  XX, YX  + 110,2 

3130  YX*YX+1  :  NEXT 

3140  MOVE  16,152:DRfiW  0,140,3 

3150  DRAW  0,30:DRAW  234,30 

3160  DRAW  630,226:DRAW  630,340 

3170  DRAW  616, 340; MOVE  630,338 

3180  DRAW  2-34,  i  40:  DRAW  0,140 

3190  MOVE  234, 140: DRAW  234,30 

3200  LOCATE  2,2  :  XS="Database"  :  G0SU8  3400  '  Double 

3210  LOCATE  2,5  :  X*  =  " Amstrad" ;  BOSUB  3400  '  Double 

3220  LOCATE  27,20  :  X*="Appuyez  sur"  :  GOSUB  3400  '  Double 

3230  LOCATE  27,23  :  X*="une  touche"  ;  GOSUB  3400  '  Double 

3240  WHILE  INKEY*=""  :  WEND 

3250  RETURN 

3260  ' 

3270  '    SOUS-PROSRAMME:  Dessine  une  carte  »n  couleur  3 

3280  :  ligne  couleur  1  cantient 

3290  '  re-ference  N$,N  (4  chiHres) 

3300  ' 

3310  ORIGIN  0,0,XX,XX+20B,YX,YX+140 

3320  CLG  liMOVE  XX,YX:DRAWR  8, 140, 1 ) DRAWR  214,0:DftAWR  0,-148 

:DRA«R  -214,0 

3330  MOVE  XX+6,YX+4:DRAWR  202, 0, 0: DRAWR  0, 132: DRAWR  -202,0:D 

RAWR  0,-132:MQVER  8,112:DRAWR  202,0 

3340  MOVER  -194, 16 

3350  TAG:PRINT  N*;:TAGOFF 

3360  RETURN 

3370  ' 

3380  '  SOUS-PRQGAMME:  AHiche  X*  en  double  hauteur 

3390  ' 

3400  FOR  i*l  TO  LEN(xJ) 

3410  POKE  double+i,ASC<MID$(X*,i,m 

3428  CALL  double  :  NEXT  :  RETURN 

3430  ' 

3440  '  Norns  pour  1 'image  ecran 

3450  '  - 

3460  DATA  "Wi 11 arcs: 7471 ", "Stevens: 6216" ,  "Soames  :5807", "Smi t 

h  :2201" 


4M 
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3470   DATA   "Nesbit    :  2207" ,  "Marks      s  2022",  "Upton    j  1091",  "Gree 

n   :8087" 

3480  DATA  "Frinton: 1011 ", "Evans  : 2877", "Barker  :8123","Alto 

n   :998l" 

3490  DATA  "   DATABASE" 

3500  ' 

3510  '  Code  machine  pour  le  texte  double  hauteur 

3520  DATA  k3E,&6E,&CD,&A5lt&B,*16,icFE,I(3E,&19 

3530  DATA  leCD,  &5A,  &BB,  &7A,  (.CD,  fcSA,  fcBB,  &0E,  &04,  *7E 

3540  DATA  &CD,  &5A,  fcBB,  *CD,  fc5A,  &B8,  *23,  MD,  !<20,  &F5 

3550  DATA  M4,  fc20,  &E7,  &3E,  &FE,  &CD,  !<SA,  &BB,  fc3E,  &0A 

3560  DATA  *CD,&5A,4BB,  &3E,  &08,  fcCD,4SA,*tBB,St3Ef  fcFF 

3570  DATA  &CD ,  &5A,  &BB ,  &3E ,  fcBB,  «eC0 ,  &5A,  &BB,  &C9,  &5A 

3580  DATA  4BB,  fc3E,  &0A,  &CD,  &5A,  4BB,  &3E,  *<08,  fcCD,  &5A 

3590  DATA  fcBB,  &3E,  fcFF,  &CD,  &5A,  &BB,  i3E,  &0B,  &CD,  &5A 

3600  DATA  i6B,&C9 

3610   '    Norn   de   champs   par   cfe+aut 

3620   DATA   Nom, Rue, Vi 1 1 e, Pays, Code    Postal , Tel .No 


ftB     *•■ 


»  i 
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Arsene  Lupin 

II  s'agit  de  s'introduire  dans  la  maison  de  Sa  Seigneuric  et  d'y  derober  le  butin.  Vous 
devez  franchir  une  multitude  d'obstacles  et  eviter  le  chien !  Se  joue  seul  contrc  1  ordina- 
teur,  a  partir  du  clavier  cm  avec  les  manettes. 

10  'ARSENE  LUPIN  by  DAVID  RADISIC 

20  'copyright  (c)  AM30FT  1985 

30  ' 

40  MODE  BilNK  0,0jBORDER  8: INK  1,26: INK  2, 15: INK  3,25 

58  INK  4,14:  INK  5,24:  INK.  6,B:INK  7,0:INK  8,0:PAPER  #1,7 

70  DIM  objx(5,20),objy(5,20),ge(nx(5,20),Qe(ny{5,^) 

80  GQSUS  380 

90  GOSUB  720 

100  pause=200:GOSU8  340 

110  IF  gems=0  THEN  6GSUB  970 

120  PEN'  4 

130  FOR  1=10  TO  12 

140  LOCATE  15,i:PRINT"SUnN"; 

150  NEXT 

160  PAPER  8sCL8  #2: PAPER  8 

170  G0SU8  1170 

180  GQSU8  1230 

190  GOSUB  1370 

200  GOSUB  1510 

210  IF  rm=0  THEN  GOSUB  1980 

220  IF  mort=0  THEN  160 

230  pause=t00:GOSUB  340 

240  PAPER  0:CLS:PEN  1 

250  LOCATE  5, 3: PRINT" VQULEZ-VQUS" ; 

260  LOCATE  7, 5; PR1NT"REJ0UER" ; 

270  PEN  5:L0CATE  9, 7: PRINT"0/N" ; 

280  i$=UPPER$(INKEY*)!lF  i*<>"Q"  AND  i$<>"N"  THEN  280 

290  IF  i*="N"  THEN  MODE  2:PEN  1 ! STOP 

300  RUN 

310  IF   chien=l    THEN    RETURN 

320  chien  =  l:cruenx=minx (r«) : chieny=miny (riti) 

330  RETURN 

340  FOR  loop=l  TO  pause 

350  FRAME 

360  NEXT 

370  RETURN  ^   ■   a 

380  rm=l;xp=6:yp=4:homme*-CHR$(224)ichien»8lvol»0 

390  SYMBOL  240,8,8,8,8,8,3,8,8 

400  SYMBOL  241,0,0,0,0,255,0,0,0 

410  SYMBOL  242,0,0,0,0,15,8,8,8 

420  SYMBOL  243,0,0,0,0,248,8,8,8 

430  SYMBOL  244,8,8,8,8,248,0,0,0 
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440  5YMB0L  245,8,8,8,8,15,0,0,0 

450  SYMBOL  246,8,12,13,14,12,12,8,8 

460  SYMBOL  247,8,12,12,14,13,12,8,8 

470  SYMBOL  248,8,24,88,56,24,24,3,8 

460  SYMBOL  249,8,24,24,56,88,24,8,8 

490  SYMBOL  250,0,0,255,253,255,255,255,0  . 

500  SYMBOL  251,28,20,20,20,20,20,20,28 

510  SYMBOL  252,0,0,255,255,255,255,255,0 

520  SYMBOL  253,28,28,26,28,28,28,28,28 

530  SYMBOL  255,195,165,60,126,90,60,36,24 

540  ENT  1,12,-4,1 

550  ENT  -2, =1000, 60, =3000,40 

560  ENV  1,10,1,5,2,-4,1,2,-1,20 

570  Tenet*(l}=STRING*(2,250>!Tenet*<2)=CHR*(25l)+CHR*(8)+CHR 

*(251>+CHR*<8}+CHR*(i0)+CHR*(251! 

580  porte*(l)=STRING*(2,252)!porte*(2)=CHR*(253>+CHR*(8)+CHR 

*(10)+CHR*(253)+CHR*(8)+CHR*(10)+CHR*(253) 

590  inter! U,0)=CHR* (246); inter* (1,1)=CHR$ (247) 

600  inter*(2,0)=CHR*(248):inter*(2,l)=CHR*(249! 

610  qeffl*=CHR*(144) ; ob j*=CHR* (233) :chien*=CHR*<255) 

620  coup*=CHR*(246)+CHR*(248)+CHR*(247)+CHR*(249)+CHR*<252>+ 

CHR*(253)+CHR*(250)+CHR*(251)+qeffl*+obj*+chien* 

630  RESTORE  3010 

640  FOR  i=l  TO  5 

650  READ  minx (i ) ,fliiny (i ! ,maxx (i ! ,maxy (i ) 

660  READ  dirU,  1)  ,dir  (i  ,2)  ,dir  (i,3)  ,dir  (i,4) 

670  NEXT 

680  WINDOW  #1  ,minx  (rn)-l  ,aaxx  <ra)+l,if  ny  (n)-l,Mxy<i  )+l 

690  WINDOW  #2,1,14,1,25 

700  CLS  #1 : PAPER  #8,8 

710  RETURN 

720  ORIGIN  50,50 

730  INK  6,24,12 

740  RESTORE  3060 

750  GOSU8  1280  i 

760  LOCATE  2,20  ■        m  f 

770  PEN  5:  PRINT"  — B ;  \x 

780  PEN  l:PRINT"echappatoires";  .'■ 

790  PEN  5:PRENT" — "| 

800  LOCATE  8, 2: PR  I  NT " ENTREE " ; 

810  pause=380:GOSUB  340 

820  CLSiLOCATE  1,3: INK  6,0 

830  PEN  1 !  PR  I  NT  homme*}"   A. LUPIN  (VOUS) ": PRINT 

840  PEN  2:PRINT  LEFTS  (porte* ( 1 ) , 1) 5 LEFT* (parte* (2) , 1 ) ; B 

Portes":PRINT 
850  PEN  3: PRINT  inter* ( 1 , 0) 5  inter* (2, 0) ; "i nterrupteur  eteint 

tl 

860  PEN  3iPRINT   inter*  ( 1 , 1 !  5  irtter*<2, 1 );  "i  nterrupteur  allume 

":PRINT 

870  PEN  4:PRINT  LEFT*  (lenet* ( 1 ) , 1 ) ;LEFT* (* enet* (2! , 1) \ " 
Fenetres":PRINT 
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880  PEN  SiPRINT  gem$?"         Bijoux"t PRINT 

898  PAPER  1 : PEN  BiPRINT  objtj"         Obstacles"! PEN  liPAPE 

R  0;PRINT 

900  PEN  1 ; PRINT  chien*:"         Lb  chien" 

910  PEN  5:PRINT:PRINT 

920  PRINT"Utilisez  le  Joystick":PRINT"   Ou  les  touches"sPRI 

NT"      flechees" 

930  feint=REMAIN(l) 

940  AFTER  delais*4,l  60SUB  340 

950  RETURN 

960  ' 

970  'GENERATEUR  DE  RUB  IS/OBSTACLES 

980  ' 

990   FOR   piece=l    TO   5 

1000   gemr  =  lNT(RND*8)+2:objr=INT(RNDI10H5 

1010  minx =minx (piece! : mi ny=miny (piece) taaxx»fiaxx (piece) max y 
=  maxy (pi  ece) 

1020  FOR  i=l  TO  gemr 

1030  x  =  INT(RND*(*naxx-fflinx  +  l>)+minx 

1040  y=INT (RND* (maxy-miny+l) )+miny 

1050  gefflx (piece, i  >  =x : gemy (piece, i)=y 

1060  ge<ns=gems  +  l 

1070  NEXT  i 

1080  FOR  i  =  i  TO  ob j r 

1090  x=INT(RNDI (maxx-minx+1) )+fflinx 

1100  y=INT(RND*(maxy-miny+l)  )*«niny 

1110  objx (piece, i  >=x:abjy (piece, i)=y 

1120  NEXT  i 

1130  gems(piece)=ge«r:obj (piece)=objr 

1140  NEXT  piece 

1150  CLB 

1160  RETURN 

1170  ON  rm  GOTO  1180,1190,1200,1210,1220 

1180  RESTORE  2670:RETURN 

1190  RESTORE  2740sRETURN 

1200  RESTORE  2810: RETURN 

1210  RESTORE  2B80:RETURN 

1220  RESTORE  2960:RETURN 

1230  PAPER  0;READ  rm*;PAPER  8  - 

1240  WINDOW  #  1 ,  minx  (riti)-lfmaxx  (r*)+l,«iny  (rm) -1 ,maxy  (riI  +  i!C 

LS  #1 

1250  PEN  liLOCATE  1 , 1 j  PRINT  SPACE*  <  19) 5 

1260  LOCATE  1 , 1 : PRINT"Piece  »"jr«*| 

1270  IF  lumiere(rm)  THEN  INK  7,10:INK  8,10  ELSE  INK  7,liINK 

1280  READ  a$:IF  aS="END"  THEN  RETURN 

1290  IF  a$="D"  THEN  2180 

1300  IF  a*="W"  THEN  2260 

1310  IF  a$="L"  THEN  GRAPHICS  PEN  Is  GOTO  2340 

1320  IF  a*="S"  THEN  2420 

1330  IF  a*="F"  THEN  GRAPHICS  PEN  6i60T0  2340 
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1340 
1358 

1360 

1370 

1388 

1398 

1400 

1410 

1420 

1430 

1440 

1450 

1460 

1470 

1480 

1490 

1500 

1518 

1528 

1530 

1540 

1550 

1560 

1570 

1580 

1590 

1600 

1610 

1620 

1630 

1640 

0 

1650 

1660 

1670 


PRINT 
STOP 


'**»  ERREUR  ***' 


1 


'  AFF1CHAGE  Bl JOUX/OBJETS 

J 

PEN  6 

FOR  i*l  TO  obj(rm) 

LOCATE  objx  ( r m,  i ) ,  objy  (rut,  i ) 

PRINT  obj*5 

NEXT 

PEN  5 

FOR  i=J  TO  gems (rm> 

LOCATE  gemx  (rm, i ) ,ge*y (m, i ) 

PRINT  gem*; 

NEXT 

PEN  IsLQCATE  xp,yp:PRINT  ho»i*«$: 

RETURN 

x+=B:yf =0:PEN  ! 

IF    INKEY(0)<>~1    OR    INKEY(72K>-1    THEN 

INKEY(2K>-1    QR    INKEY<73)<>-1    THEN 

INKEY(B)<)-1    OR    INKEY(74K>-t    THEN 

INKEYUIO-1    OR    INKEY(75)<>-1    THEN 

x*  =  0    AND    y-f  =0    THEN    1630 
LOCATE    xp  +  xf ,yp+y+ :ht$=COPYCHR$(#0! 
IF    ASC(ht$)>239    AND    ASC(ht*)<246    THEN 
IF   htt<>"    "    THEN    1660 
LOCATE  xp,yp:PRINT"    "j 

PAPER   0;LOCATE    15,5;PRINT"  Bj« PAPER   8 

xp=xp+xf :ypayp+yf 
LOCATE   xp,yp:PRINT    hommet: 
IF   chien>0   THEN   chien=chien   MOD    2+l:IF   chiart*2   THEN   255 


IF 
IF 
IF 

IF 


yf=-l 
y*  =  l 
xf  =  -l 
x  +  =  l 


1510 


1 
i 


GOTO    1510 

coup-INSTR(coup*,ht*):char=ASC(MID$(coup«,coup,l)) 

ON    coup    GOTO    1690,1690,1690,1690,1750,1750,1850,1900,19 
70,2090,2650 
1688    BOTO    1600 

IF   coup)2   AND   coup<5    THEN   ch*r=char-i 

IF  coup<3  THEN  char*char+t 

PEN   3:L0CATE   xp+xf , yp  +  y+ s PR  INT   CHRKchar); 

lunuere(rm)  =lumiere(rfl)  *XOR    1 

7, 103  INK  8,10  ELSE  INK  7,BsINK 


1690 
1700 
1710 

1720 

1730 

8,0 

1740 

1758 

1760 

1770 

1780 

1790 

1800 


IF  lumiere(rm)  THEN  INK 


GOTO  1510 

IF  xf<>0  AND  yf<>0  THEN 
xf<0  THEN  dir=4  ELSE 
yf<0  THEN  dir=l  ELSE 
dir(rm,dir)=-l  THEN 


IF 
IF 
IF 
IF 

IF 


chien>0  THEN  GOSUB  310 

di r  =  1  THEN  xp=6: yp=max y (rm) 


1638 

IF  xf>0  THEN  dir=3 
IF  yf>0  THEN  dir=2 
1630  ELSE  rra=dir (rm,dir) 


►► 
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1818  IF  dir=2  THEN  xp  =  6: yp=*iny (r«) 

1820  IF  dir=3  THEN  xp=mi  nx (rm) J  yp  =  13 

1830  IF  dir=4  THEN  xp=maxx  (rm)  :yp=13 

1840  RETURN 

1850  IF  xp>5  AND  xp<8  THEN  18B0 

I860  IF  xp<6  THEN  dir=4  ELSE  dir=3 

1870  GOTO  1780 

1880  IF  yp>13  THEN  dir  =  2  ELSE  dir=l 

1890  GOTO  1780 

1900  PAPER  0; CIS: PEN  1 

1910  LOCATE  3,3:PRINT"vou5  vous  en  tlrez  f  ; 

1920  LOCATE  9,  5: PR1 NT"avec" i  „,  „  ,„„„__ 

1930  IF  t,effls  =  vol  THEN  LOCATE  B,  7:  PRINT"TOUT  !"}  ELSE  LOCATE 

9,7 

1940  PRINT  USING  "  ##" ; vol  J 

1950  PEN   5-.L0CATE   8,9:PRINT    "Bijoux"; 

I960  mort=i:RETURN 

1970  LOCATE  xp,yp:PRINT    "    " ; : xp=xp+x*: yp=yp+y< 

1980  i=0 

1990  i=i+l 

2000  IF    i  >gens  trmJ    THEN    1510 

2010  IF   gefflx(rm,i)<>xp    OR   gemy  (r«,  l  >  Oyp   THEN    1990 

2020  IF    i=gems(rm>    THEN    2050 

2030  gemx (rm, i ) =gemx (rm, gems (rm) ) 

2040  gemy(rfl),i)=o,etny(r(n,geins(r(n)) 

2050  qems(rm)=Qem5(rm)-l! vol=vol+l  ",*„,  .    « 

2060  MOVE  400,150+(vol*2),l,l:DRAW  560, 150+ < vol *2) , 1 , 1 

2070  SOUND  129,248,10,12,0,1 

20B0  GOTO  I960 

2090  bruit=INT (RNDt  15) 

2100  SOUND  1,3000, 10, bruit, 0,0, 10 

2110  PAPER  0:LOCATE  15, 5;PR1NT"CRACK !" j : PAPER  8 

2120  IF  bruit<10  OR  delais=50  THEN  1630 

2130  delais=delais-50 

2140  feint=REHftIN(i) 

2150  AFTER  delais*4,l  G0SU8  318 

2160  GOTO  1630 

2170  ' 

2180  '  dessin  des  portes 

2190  ' 

2200  READ  no,dr» 

2210  IF  dr»="V"  THEN  dr=2  ELSE  dr*l 

2220  PEN  2  ■  ■   • 


►► 
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2230  pici=porte$(dr):GOSUB  2508 

2240  GOTO  1280 

2250  ' 

2260  '  dessin  des  fenetres 

2270  ' 

2280  READ  no.wi* 

2290  IF  wi$="V"  THEN  wi=2  ELSE  wi  =  l 

2300  PEN  4 

2310  pic*=-fenet»(wi);GOSUB  2S00 

2320  BOTO  1280 

2330  ' 

2340  '  tire  les  traits 

2350  ' 

2360  READ  xl,yl,x2,y2 

2370  MOVE  x!,yl,,0 

2380  DRAW  x l,y2, ,0: DRAW  x2,y2,,B 

2390  DRAW  x2,y£, ,8: DRAW  xl,yt,,8 

2400  SOTO  I28B 

2410  ' 

2420  '  dessine  les  interrupteurs 

2430  ' 

2440  READ  no,swt 

2450  IF  sw*="L"  THEN  sw*l  ELSE  sw=2 

2460  PEN  3 

2470  pic*=intert(sn,0) [GOSUB  2500 

2480  BOTO  1280 

2490  ' 

2500  '  affichc  le  caracter« 

2510  ' 

2520  READ  x,y:L0CATE  x,y:PRINT  picf; 

2530  no=no~l;IF  no>0  THEN  2520 

2540  RETURN 

2550  PEN  1:L0CATE  chi enx ,chi eny: PRINT"  "; 

2560  hom*e*=CHR*(225) 

2570  IF  (chienx=xp  AND  chieny=yp)  OR  (chi *nx»xp+xf  AND  chien 

y=yp+yf)  THEN  2650 

2580  IF  chienx<xp  THEN  chienx=chienx  + 1 

2590    IF   chienx>xp    THEN   chienx=chienx~l 

2600  IF  chieny<yp  THEN  chi eny=chieny+l 

2610  IF  chieny>yp  THEN  chi eny=chi eny-1 

2620  LOCATE  chienx , chi eny: PR  INT  chien*; 

2630  SOUND  i,0,RNDt40, 10,1,2,31 

2640  GOTO  1510 

2650    PRINT-'SNAP'  "; 


■I 

-3 

i 
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Et  pour  quelques  programmes  de  plus.. 


2660  *ort=l: RETURN 

2670  DATA  ENTREE 

2680  DATA  1,64,308,226,4 

2690  DATA  0, 2, H, 6, 3, 6, 22 

2700  DATA  D,2,V,4,12,9,ll 

2710  DATA  S,1,L,4,U 

2720  DATA  S,1,R,9,14 

2730  DATA  END 

2740  DATA  SALON 

2750  DATA  1,2,308,258,4 

2760  DATA  0,1, V, 10,12 

2770  DATA  W, t,H,6,3 

2780  DATA  14, I, V, 2, 12 

2790  DATA  S, 2,R, 10, U , 10, 15 

2B00  DATA  END 

2810  DATA  SALLE  A  MANGER 

2820  DATA  L, 2, 308, 258, 4 

2830  DATA  W,1,V,18,12 

2840  DATA  W,1,H,6,3 

2850  DATA  D, 1 , V, 2, 12 

2860  DATA  S, 2, L, 2, 1 1 , 2,  15 

2870  DATA  END 

2880  DATA  CUISINE 

2B90  DATA  L, 2,276,384,4 

2908  DATA  D, 2, H, 6, 5, 6, 22 

2910  DATA  W,1,H,  10,22 

2920  DATA  W,1,V,14,13 

2930  DATA  D,1,V,2,13 

2940  DATA  S,1,L,2,16 

2950  DATA  END 

2960  DATA  LINGERIE 

2970  DATA  L, 2, 276, 256, 4 

2980  DATA  D,1,V,10,12 

2990  DATA  S,l,R,10,lt 

3000  DATA  END 

3010  DATA  5,4,8,21,0,4,3,2 

3020  DATA  3,4,9,21,-1,-1,1,-1 

3030  DATA  3,4,9,21,-1,-1,-1,1 

3040  DATA  3,6,13,21,1,0,-1,5 

3050  DATA  3,6,9,21,-1,-1,4,-1 

3060  DATA  L, 64, 308,480,  100 

3070  DATA  F, 250, 98, 294, 102 

3080  DATA  F, 250,306, 294,310 

3090  DATA  F, 390, 94, 430, 106 


Et  pour  quelques  programmes  de  plus-.- 
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3100  DATA  F, 390,302, 430, 314 
3110  DATA  F, 474, 240,488,270 
3120  DATA  F, 474,124,488,154 
3130  DATA  F, 58, 240, 72, 270 
3140  DATA  L, 226, 308, 322, 180 
3150  DATA  L,  160,180,480,100 
3160  DATA  1,64,180,160,100 
3170    DATA    END 


Si  cesjeux  vous  ont  plu,  vous  pouvez  vous  joindre  au  Club  des  utilisateurs 
AMSTRAD.  Entre  autres  privileges  et  avantages,  vous  recevrez  gratuite- 
ment  le  mensuel  AMSTRAD  qui  public  programmes  dejeu,  utilitaires,  fonc- 
tions  speciales,  bulletins  de  participation  a  des  concours  et  des  informations 
de  dernier e  minute. 


i 
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1 
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(Le  premier  numero  renvoie  au  chapitre  et  le  second  a  la  page.  Ainsi,  pour 
la  reference  1.44  reportez-vous  au  chapitre  1,  page  44.) 


)A  1.44  1.75  5.8 

ABS -3.3 

Acces  sclectif 5-! '  8-4 

AFTER  3.4  9.29 

Amplificateur  (externe)  19  I-68  7-39 

AMSDOS 175  5-1  532 

AND  3.49.18 

AND  (LOGO)  616 

Animation  9~3 

.APV  6-43 


B 


ARCTAN 


6.13 


ASC  3.5 

ASCII 7.8  7.21 

ASCII  (LOGO) 6-8 

ASM  5-37 

ASSIGN.SYS A-\ 

ATN 3-5 

AUTO 2.10  3.5 

iAUX  5-28 


|B 1.44  1.75  5.8 

IBANKFIND 1.87  8.6 

BANK  MANAGER 1-84  8.1  9.63 

IBANKOPEN  1.86  8.4 

iBANKREAD  1.87  8.5 

iBANKWRITE 1.87  8.4 

BASIC 1-22  3.1  7.32  9.7 

BF  6-8 

BINS  3.6 

Bit  W 

BK 6.29 

BL  6-8 

Boitier  d'alimentation/modulateur  MP2 1.3  1.5  1.65 
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800TGEN 5.33 

BORDER 1.49  3.6  7.6 

Bouton  EJECT  1.14 

BREAK  3.6 

BUTTONP  6.35 

BYE  6.7  6.38 


CALL 3.7 

Caracteres  1-55  7.9  7.43  7.52  7.54  9.14 

Caracteres  ASCII 7.8  7.9  9.15 

Caracteres  d'extension  3.37  7.22 

Caracteres  de  controlc 7.3  9.51 

Caracteres  definis  par  1'utilisateur 3.79  7.46  9.21 

(cas  d'erreur  etc..)  (LOGO) ■ 6.40 

Casque  d'ecoute 1-9  1.68 

CAT 1-43  3.7 

CAT  (cassette) 4.11 

CATCH  6.40 

Cercles 1.60 

CHAIN  3.7 

CHAIN  (cassette)  4.12 

CHAIN  MERGE  3.8 

CHAIN  MERGE  (cassette) 4.12 

CHANGEF  6.33 

CHAR 6.8 

Chargement  du  logiciel 1-20 

Chargement  du  programme  de  bienvenue 1.21 

Checksum  (Somme  de  controle)  9.32 

CHRS 3.8  9. 16 

CINT  3.8 

Clavier 1.15  5.25  7.21  7.22  7.23  7.43 

CLEAN 6.22 

CLEAR  3.9 

CLEAR  INPUT  3.9 

CLG  3.9 

CLOAD  5.13  5.14  5.35 

CLOSEIN  2.10  3.10 

CLOSEIN  (cassette) 4. 14 

CLOSEOUT  2.9  3.10 

CLOSEOUT  (cassette) , 4.15 

CLS 1-22  3.10  7.4 

CO ■• 6.38 

Code  machine  7.7 
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Codes  de  controle  5.19  7.1  7.3  9.51 

Commande  de  hauteur  d'image ■■■  J~ 

Commutateur  de  marche/arret V-ic 

CON  "  1ft 

Configuration  de  programmes  et  progiciels *-°  *•' 

Connexion  au  secteur }j 

Connexion  de  la  prise  secteur  du  systeme ■■■■■■■  1-j 

Connexion  de  peripheriques 1-7  7-38  7.39  7.40  7.41 

Connexions  de  l'ordinateur ■■■■■••   '■? 

CONT  I'S 

.CONTENTS  bAJt 

Copie  de  disquettes \'""'",\  \  ,, 

Copiedefichiers 1.45  1.77  5.11  5.13  5.14 

COPYCHRS  3.11 

COPYOFF J-jJJ 

COPYON J-fJ 

COS  3.\\ 

cos  (logo) ;•■;;•■;■«  5* J2 

Couleurs l-«     54  5.24 

Couleurs  clignotantes li52  3-'5 

COUNT  6* 

CP/M  5-17 


CP/M  2.2 1.82  4.10  5.31  5.33  6.2 

3.11 

5.28 


CP/M  !'3Vn 

CREAL 3.11 

™T :::::::::::::::::::::: 6.22 

csave"::::::::::::":"::"'" 5-135-14^ 

P'P  6.20 

CURSOR • 3,1Voft 

CURSOR  (LOGO) 6-20 


DATA 3.12  7.27  9.31 

DATE  5-31 

DDT  5.37 

DECS  3.13 

•DEF «•« 

DEFAULTD  ""\~H 

DEF  FN  3.13  7.29 

DEFINE  5J5 

DEFINT  3.14 

DEFREAL  3.14 

DEFSTR 3.15 

DEG  3.15 


Index 
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DELETE 3.16 

.DEPOSIT 6.42 

DERR 3.16  7.30  7.31  7.32 

DEVICE  5.27  5.28 

Dl  3.17  9.30 

DIM  2.3  3.18  7.28 

DIR  5.9 

DIR  (CP/M) 1.40  5.21  5.29 

DIR  (LOGO) 6.33 

DIRPIC  6.34 

DIRS ; 5.21 

DIRSYS 5.21 

IDISC 1-76  5.9 

IDISC.IN  1.76  5.9 

IDISCOUT 1.76  5.9 

DISCKIT2  1.82  5.35 

DISCKIT3  1.40  1.77  5.23 

Disquettes  1.11  1.38  4.1 

Disquettes  de  sauvegarde 4.2 

Disque  virtucl 

DOT 6.22 

DOTC  6.22 

Dr.  LOGO  6.2 

DRAW 1.58  3.19 

DRAWR 3.19 

DRIVE 5.10 

DRIVERS.GSX  4.9 

DUMP  5.37 


E/S 7.38  7.47 

Ecriture  transparente  7.5  9.51 

ED 5.37 

EDALL 6.19 

EDF  6.20 

EDIT 1.27  3.20 

ED  (LOGO) 6.19 

Edition  1.27 

Edition  (LOGO)  6.6  6.19 

Edition  avec  le  curseur  de  copie 1.28 

EI  3.20  9.30 

Elevation  a  une  puissance 1.35  1.37 

ELSE 1.29  3.20 

EMPTYP  6.9 

.EMT  .■ 6.43 
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Emulateur  de  terminaux  4.5  7.48 

Emulateur  de  VDU  (visual  display  unit) 4.5  7.48 

END  3.21 

END  (LOGO) 6.18 

ENL  6.43 

ENT  1.72  3.21  9.41 

ENT(LOGO)  6.38 

ENV  1.70  3.23  9.38 

ENV(LOGO)  6.37 

Enveloppe  de  tonalite 1.72  3.21  9.41 

Enveloppe  de  volume 1-70  3.23  9.38 

EOF  (Fin  de  Fichier) 3.25  4.14  5.8  7.29 

EOF(CP/M) 5.28 

ER 6.30 

ERA  5.21 

|ERA  5.10 

ERALL  6.30 

ERASE  3.25 

ERASE  (CP/M)  5.21  5.29 

ERL  3.25 

ERN 6.30 

ERR 3.26  7.32 

ERRACT 6.42 

Erreur  de  syntaxe 119  7.27 

Erreurs  de  lecture 4.12 

ERROR  3.26 

ERROR  (LOGO)  6.40 

Espace  de  stockage  (disquette) 1  38  1.39  1.44 

EVERY  3.27  9.29 

.EXAMINE  6.42 

EXP  3.27 


FALSE : 6.42 

FD 6.26 

FENCE  6.23 

Fichier  sans  nom 4.12  4.15  4.16 

Fichiers  ASCII  1.45  3.71  5.4  5.11  5.13  5.14  7.29 

Fichiers  BASIC 1-45  3.71 

Fichiers  binaires 1.46  3.71  5.13  5.14 

Fichiers  en  lecture  settlement 5.12  5.30  5.34  7.31 

Fichiers  proteges  1-45  3.71 

FILECOPY 4.10  5.34 

Files  d'attenle  sonores 3.52  3.77  7.7  9.44 

FILL  1-62  3.27  9.48 
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G 


H 


FILL  (LOGO)  • 6-23 

FIRST 6-9 

FIX  3.28 

FN 3.28 

Fonctionnement  des  cassettes  1.7  1.76  4.1 1  5.12  5.13  5.14  5.35 

FOR  1.30  3.28  7.27  7.30  9.16 

Format  commercial 1-41  5.33  7.44 

Format  d'impression 3.61  9.22 

Format  de  la  disquette 1.38  1.40  1.79  5.33  7.44 

Format  de  donnees  settlement 1-41  5.33  7.45 

Format  du  systeme 1-42  5.33  7.44 

Format  IBM 5-33  7.45 

Formatage  d'impression 3.61  9.22 

FPUT 6-9 

FRAME '-57  3.29 

FRE  3.29 

FS 6-24 


GENGRAF  4-9 

GLIST 6-32 

GO  6.39 

GOSUB 1-31  3.30  7.27 

GOTO  »-243-30 

GPROP 6-32 

GRAPHICS  PAPER  3.30  9.50 

GRAPHICS  PEN  I-*4  3-31  9.48 

Graphismes  1-47  1.55  9.47  9.56 

Grille  de  creation  d'enveloppe 7.37 

Grille  de  creation  d'enveloppe  sonorc 7.37 

Grille  de  musique 7.37 

Grille  eeran/mode 7-34  7.35  7.36 

Grilles 7-34  7.35  7.36  7.37 

Grilles  fenetre 7-34  7.35  7.36 

GSX 4-9 


Hauts-parleurs  (exterieurs) I-9  1-68 

HELP 4-3 

HEX$ 3.31 

HIMEM  • 3.32  7.46 

HOME  626 

HT 6.27 
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IF 1.28  3.32 

IF  (LOGO)  $-3J| 

Imprimantes 1-8  5.26  7.41  7.42  7.43 

.IN 6'42 

tndicateur  ON !-4  J-J 

INK  (encre) 15°  3-*3„7., 

INKEY.... 3.33  7.43 

INKEYS  2.12  3.34  7.43 

INP  3.34 

,NPUT 1-25  2.2  3.35  7.28 

INPUT  (cassette)  : 4-14 

Insertion  des  disquettes !■'' 

Installation  ■■■■■■'•! 

INSTR  ,  ,f 

™T 3.36 

INT  (LOG) ■■■   *» 

Interface  sene Va-va 

Interraptions  '■'      a 

ITEM  6J0 


Jokers '""xJ£ 

JOY 3.377.43 


KEY 3.37  7.22 

KEYDEF 3.38  7.22  7.43 

KEYP  6-36 

KEYS.CCP  4.3  5.25 

KEYS.DRL  5-25 

KEYS.WP ■ 5-25 


LABEL  - 6-39 

Lancement  du  programme  de  Bienvenue 1-21 

LANGUAGE  4-3  5.24  7.53 

LAST  61° 

LC 6.10 

LEFTS  3-39 
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LEN 2.8  3.39 

LET 3.39 

Lignes  en  pointilles  3.43  9.49 

LINE  INPUT  3.40 

LINE  INPUT  (cassette) 4.14 

LIST 1.23  1.54  3.40 

LIST  (LOGO) 6.10 

LISTP  6.10 

LOAD 1.44  3.41 

LOAD  (cassette)  4.12 

LOAD(CP/M) 5.37 

LOAD  (LOGO)  6.34 

LOADPIC 6.34 

LOCAL 6.17 

LOCATE  1.55  3.41  7.6 

LOG 3.42 

LOG  10  3.42 

Logiciel  1.20  1.21  7.53  7.54 

Logique  3.4  3.48  3.54  3.91  9.18 

LOGO .■ 6.1 

LOWERS 3.42 

LPT 5.28 

LPUT 6.11 

LST  5.28 

LT  6.27 

Lutins  (sprites)  9.54 


MAKE  6.17 

Manettes  de  jeu 1.7  7.21  7.23  7.43 

Marque  de  la  date  et  de  Pheure 5.31 

MASK  3.43  9.49 

Materiel 7.46  8.1 

MAX 3.43 

MEMBERP  6.11 

Memoire  (machine) 1.84  7.46  8.1  8.2  9.56 

MEMORY 3.44  7.27  7.46 

Menu 2.5  3.51  3.52 

MERGE 3.44 

MERGE  (cassette) 4.12 

Message  a  la  raise  sous  tension 1.4  1.5 

Messages  d'erreur 7.27 

Messages  d'erreur  AMSDOS 5.15  7.31  7.32 

MIDS  3.44  3.45 

MIN 3.45 
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Mise  en  attente  d'un  canal  sonore 3.73  9.38 

Mise  sous  tension ^ I-4  '■•> 

MOD  1-34  3.46 

MODE  1-4?  3.46  7.3 

Modes  de  couleur  d'encre 7-5  9-52 

Moniteur '■; 

Mots  cles 3.1  7.32  1.22  3.1  7.32 

Mots  de  passe  *••"■ 

MOVCPM  5-3? 

MOVE  1-59  3.47 

MOVER 3.47 


NAMEP '. .'...' ■ 6-17 

NEW 3.48 

NEXT  1.30  1.61  3.48  7.27  7.30  9.16 

NODES 6.6  6.30 

NOFORMAT  6-31 

Nombres  aleatoires  3.69 

Nombres  binaires ".9 

Nombres  hexadecimaux  5.1 1 

NOT 23.48  9.20 

NOT  (LOGO) 6-16 

Notes  de  musique 7.24 

NOTRACE  6.41 

NOWATCH  6-41 

NUMBERP  6.11 

Numeros  d'erreur '-27 


Octet  9.9 

ON  BREAK  CONT  3.49 

ON  BREAK  GOSUB 3.49 

ON  BREAK  STOP 3.50 

ON  ERROR  GOTO 3.50  7.29  7.32 

ON  GOSUB 2-6  3.51 

ON  GOTO 3.52 

ON  SO  GOSUB 3.52  7.7  9.44 

OP  6.39 

OPEN1N  2.10  3.53  7.29  7.30 

OPEN1N  (cassette)  4-14 

OPENOUT  2.9  3.53  7.30 

OPENOUT  (cassette) 415 

Operateurs 1.33  9.18 
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Operations  arithmetiques 1.33  7.27  7.28 

Operations  arithmetiques  (LOGO) 6.13 

Operations  Iogiques  (LOGO) 6.16 

OR  3.54  9.19 

OR  (LOGO) 6.16 

Organisation  des  disquettes 7.44 

ORIGIN  1.61  3.54 

OUT 3.55 

.OUT  (LOGO) 6.42 


PADDLE 6.36 

PAL  6.24 

PALETTE 5.24 

PAPER  1.49  3.55  7.4 

PAUSE  6.41 

PD 6.27 

PE  6.27 

PEEK  3.56 

PEN  1.49  3.56  7.4 

Periphcriques 1.7  9.3 

PI  3.57 

PIECE 6.11 

PIP  4.4  5.28 

Pistes  reservees  a  CP/M 5.18 

PLIST  6.32 

PLOT  1.58  3.57 

PLOTR  3.58 

PO  6.18 

POALL  6.31 

POKE  3.58 

PONS 6.31 

POPS 6.31 

POS 3.59  4.14 

POTS  6.19 

PPROP 6.32 

PPS 6.32 

PR  6.21 

PRINT  1.22  3.59  9.22 

PRINT  SPC 3.60  9.23 

PRINT  TAB  3.60  9.23 

PRINT  USING  3.6!  9.23 

Prise  antenne  (TV) 1.3 

Prise  CC 1.2  1.3 

Prise  DISC  DRIVE2 1.9  7.40 
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Prise  EXPANSION  1.10  7.40 

Prise  JOYSTICK  1.7  7.38 

Prise  MONITOR  1.2  1.3  7.39 

Prise  PRINTER 1.8  7.4 

Prise  STEREO  1.9  1.68  7.39 

Prise  TAPE  1.7  7.39 

.PRM  6.43 

PRN  5.28 

PROFILE  4.3  5.18 

Progiciels  4.5  4.8 

Programme  de  Bienvenuc  1-21 

Programme  ROINTIME.DEM  1.20 

Programme  «  Salut  Tartiste  » 9.56 

Protection  contrc  I'ecriture 1.12  1.80 

PU  6.27 

PX  6.28 


Quotient  6.13 


Racine  carree  1-34  3.77 

Racine  cubique 1-35 

RAD  3.64 

RANDOM  6.14 

RANDOMIZE  3.64 

RAZ  des  canaux  sonores 3.73  9.38 

RC 6.36 

READ  3.64  7.27  7.28  9.31 

RecepteurTV 1.3  1.5  1.68 

RECYCLE 6.7  6.31 

REDEFP 6.43 

Reglage  de  brillance  (BRIGHTNESS) 1.4 

Reglage  du  contraste  (CONTRAST) 1.4 

Reglage  du  VOLUME 1.9  1.68 

Reinitialisation  de  Fordinateur  1.20  1.21 

RELEASE  3.65  9.43 

RELEASE  (LOGO) 6.38 

REM 1.30  2.2  3.65 

REM  6.43 

REMAIN 3.66  9.30 

REMAINDER  6.14 

REMPROP  ■ 6.33 
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REN 5.22 

[REN 5.10 

RENAME 5.22  5.30 

Rendez-vous  (canaux  sonores) 3.73  9.37 

RENUM  2.7  3.66 

REPEAT 6.39 

RERANDOM  6.14 

RESTORE  3.67  9.33 

RESUME 3.67  7.29 

RESUME  NEXT 3.68 

RETURN  1.31  3.68  7.27 

RIGHTS  3.69 

RL 6.37 

RND  3.69 

ROMs  d'extension  7,46 

ROUND  3.70 

ROUND  (LOGO)  6.14 

RQ  6.37 

RS232 5.27  9.3 

RSX  7.45 

RT 6.28 

RUN  1.23  1.44  3.70 

RUN  (cassette) 4.12 

RUN  (LOGO)  6.40 


Sauvegarde  des  variables ■. 2.9  3.90  5.6 

Sauvegarde  sur  cassette 4.16 

SAVE  1.43  1.45  3.71 

SAVE  (cassette)  4.16 

SAVE  (LOGO)  6.34 

SAVEPIC 6.35 

SCREENCOPY 1.85  8.3  9.63 

SCREENSWAP 1.85  8.3  9.63 

SE..... 6.12 

Sectorisation  5.35  5.36 

SET  5.30 

SET24x80 5.26  5.27 

SETBG 6.24 

SETCURSOR 6.21 

SETD  6.35 

SETDEF  5.32 

SETH  6.28 

SETKEYS 4.3  5.25 

SETLST  5.26 
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SETPAL 6.24 

SETPC  6.28 

SETPOS  lirj. 

SETSCRUNCH  °.;_ 

SETSIO J27 

SETSPLIT  6.21 

SETUP 5.35 

SETX  J.29 

SETY  b/tt 

SF    625 

SON  "2 

SHOW(CP/M)  l"ll 

SHOW  (LOGO) 6.21 

SHUFFLE  °.12 

SIN "2 

SIN  (LOGO) : 6.L5 

SIO  5' 

SOUND"" 1-6*  3.73  7.24  9.35 

SOUND  (LOGO)  6Al 

I^.:iz:::::::::::=::::=:::::::::~="im« 

SPEED  INK  3.75 

SPEED  KEY J-™ 

SPEED  WRITE 3-?6  4.17 

cq  3.77  9.45 

Sqr::::::::::::::::::: 1.343.77 

cc  O.ZJ 

^  I:::::::::::::::::::::::::: 6.29 

STAT  5-34 

oTPP  1.30  3.78 

JKt== .■■»•* 

STOP  f-'° 

STOP  (LOGO) 6.4U 

STR$ 3.78 

STRINGS  ■■*!7 

SUBMIT  ,70 

SWAP  

symbol'::::::::::: "VJ5-2 

SYMBOL  AFTER i  In  <i? 

Synthetiscur  de  parole Y« 

SYSGEN 5-33 


TAB  3.82  9.23 

Tableaux ::::::::::::::::::::: 2.3  s.w  3.25  7.2? 
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TAG 3.82  9.50 

TAGOFF  3.83  9.50 

TAN  3.83 

jTAPE  1.76  5.1(7 

TAPE.IN 1.76  5.11 

TAPE.OUT 1.76  5.11 

TEST 3.84 

TESTR 3.84 

TEXT 6.19 

TF  6.29 

THEN  1.28  3.84 

THING  6.18 

THROW  3.85  6.41 

TIME  3.85 

TO 3.85 

TO  (LOGO) 6.19 

TOPLEVEL  6.43 

Touche  CAPS  LOCK  (majuscules) 1.17 

ToucheCLR  1.18 

Touche  COPY 1.28 

Touche  DEL  1.16 

Touche  ENTER  1.16 

Touche  ESC 1.18  3.49 

Touche  RETURN  1.15  1.18 

Touches  definics  par  l'utilisateur 3.37  7.21  7.22  7.23 

Touches  du  curseur 1.15  6.6 

Touches  SHIFT  1.16 

TOWARDS  6-30 

TRACE 6.41 

TROFF  3.86 

TRON 3.86 

TRUE  6.43 

TS 6.21 

TYPE  (CP/M) 5.22  5.30 

TYPE  (LOGO) 6.22 


UC  ; 6.12 

Unite  de  disquette  supplementaire 1.8  1.14  1.40  1.42  1.80  5.4  7.40 

UNT  3.86 

UPPERS  3.86 

USE  5.22 

USER 5.22 

IUSER 5.11 

USING  3.87  9.23 
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Y 


VAL  187 

variables-:::::::::::: l^fJil 

Variables  (sauvegarde) Aa-j£ 

Variables  chaine i2b  J-J* 

Verification  des  disquettes  *•*' 

Vibrato \"mT-ii< \l 

Vidage  de  1'ecran lM  3J1  5° 

Voyant  de  la  disquette  -' l\z 

VPOS  j-8/ 


WAIT 

WAIT  (LOGO) %f 

WATCH  ■»•■   bAl 

WEND I,? 

WHFRF  "•'- 

whIlT.:::::::::::::::: 3-88  7-27  73j! 

WIDTH  iSy 

WINDOW  2.11  3.89  7.5  9.26 

WINDOW  (LOGO) ■-■••   J-25 

WINDOW  SWAP 3-90  '-JJ 

WORD °'  2 

WORDP  ^ 

wrrV:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::^ 

WRITE  (cassette) 4-15 


XOR  3.919.20 

XPOS   :-.. J~ 

XSUB yj/ 


YPOS  .■ 392 


ZONE  3.92  9.22 
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